并屏蔽掉汉字以外的字符!!
解决方案 »
- 连续3个月保持VB分社区榜首了,小小庆贺一下!
- (Excel宏编程)在本机可以运行,到其它机子上就不行了,WHY??
- 浏览器高手关注:如何获得Web Browser中页面框架(frame iframe)内的元素。
- 各位帮忙推荐一个控件?
- adodc控件的上一个、下一个、最前一个以及最后一个的按钮中将触发什么事件???
- 高手进来。。。。。。。。。
- 操作XML文件的问题,我是VB6.0,引用MS XML V 2.0
- 在EXCEL中怎么实现链接表功能
- VB的大小设置问题,在线等待~~
- 200分请教 WINDOWS 文件属性的摘要的高级方式的界面的实现
- 如何获得一个汉字的宽度等于2,一个英文字母的宽度等于1 ?
- 急!!关于GetDriveType!!急!
On Error Resume Next
'*************************************文本框为中文有效性验证********************
If Chr(KeyAscii) = vbBack Then Exit Sub
If KeyAscii>0 Then
KeyAscii = 0
MsgBox "该字段必须为中文名称!请重新输入!!", vbOKOnly, "Stop!!"
End If
End Sub