vb有没有一种方法，可以删掉text1里规定位置的数字？

显示全部楼层 · 2010-11-27 17:58:27

有没有一种方法，可以删掉text1里规定位置的数字？
比如说，
12 12 12 12 12 12 123456 12 12 12 12 12 12
怎么删掉123456
在线等，谢谢各位大哥

千问 · 2010-11-27 17:58:27

dim s,i,cs=text1.texts=left(s,i-1) & right(s,len(s)-i-c)text1.text=si你设置的位置，C你设置的长度。

千问 · 2010-11-27 17:58:27

Text1.Text = Replace(Text1.Text, "123456", VBNullString)

千问 · 2010-11-27 17:58:27

Private Sub Form_Click()a = Split(Text1, ",")For i = LBound(a) To UBound(a)b = Split(a(i), ".")If a(i) > 100 Or a(i)0 ThenElses = s &