Question

vb 怎样删除文本框里的中文字符?

单击按钮后，就把文本框里的所有中文都删掉，只留下英文和数字和特殊字符。有什么函数没呢？

Answer 1

没有 不过可以用循环法过滤掉中文咯

Answer 2

Private Sub Command1_Click()
Dim s As String
s = ""
For i = 1 To Len(Text1.Text)
If Asc(Mid(Text1.Text, i, 1)) > 0 Then s = s + Mid(Text1.Text, i, 1)
Next i
Text1.Text = s
End Sub