vb去掉text广西框的第一个字

来源：百度知道 编辑：UC知道 时间：2024/05/30 21:11:52
在text文件框里输入ABCDDEATC 点下按钮 会把text文本框里的第一个字符A去掉！其它位置的A不动！怎么写代码！急
拜托各位，请看清题目吧！是只去掉第一位的 A 不是每点一次就去掉一个！请大家再帮帮忙

private sub command1_click()
DIM A AS String
A=TEXT1
TEXT1=Mid(A,2)
end sub
这个函数是从第二位开始取，也可以设置取几位，就是在2后面多加逗号再加数字，数字是几就是取几位

那你将有效性属性设为假，点都点不了，再不行可见性都设为假

这个不行我把头给你：
text1.text=mid(text1.text,2,len(text1.text)-1)

txtstr=text1.text
text1.text=right(txtstr,len(txtstr)-1)

Private Sub Command1_Click()
Dim a As Integer, b As String
a = Len(Text1.Text)
b = Right(Text1.Text, a - 1)
Text1.Text = b
End Sub

Private Sub Command1_Click()
If Left$(Text1.Text, 1) = "A" Then Text1.Text = Right$(Text1.Text,Len(Text1.Text) - 1)
End Sub

http://catrun.cn/article.asp?id=110