如何去除字符串中除了汉字和字母外的其它字符? 如何去除字符串中除了汉字和字母外的其它字符,诸如标点,换行符,或乱码的符号……谢谢。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Dim strTest As StringstrTest = "ijfio09u3ui乱hf9o*(&*%^(*Y" & vbCrLf & "iohhvujisb测试一下"Dim i As IntegerFor i = 1 To 127 If (i < 65) Or (i > 90 And i < 97) Or i > 122 Then strTest = Replace(strTest, Chr(i), "")NextDebug.Print strTest 把它们一个个读出来看一下它们的ASCII码是多少 chewinggum的方法对于长度大于127的字串还是最优的.. 要是小于127,还不如WuYunpeng说的逐一校验ASC.. 如何设计一个最简单的容器控件! vb 如何设置打印边距? vb 请问哪种方式拷贝共享文件最快最稳定并且要能够显示进度条? 哪一个版本的水晶报表比较好用? 急,哪里有matrixVB下载啊,matcom中有matlib42.dll吗? 程序基础问题 一个小问题,在线等待! 请问这个界面在水晶报表中的作用 问MSFLEXGRID控件的问题,谢谢! 如何改变一个外部程序的文本框里的内容? 急!关于 .Execute "Update 的更新 急!!如何将表中某个字段的内容做成下拉列表框
strTest = "ijfio09u3ui乱hf9o*(&*%^(*Y" & vbCrLf & "iohhvujisb测试一下"Dim i As Integer
For i = 1 To 127
If (i < 65) Or (i > 90 And i < 97) Or i > 122 Then strTest = Replace(strTest, Chr(i), "")
Next
Debug.Print strTest