一、学员问题描述: 定制班:上海--铂钻石油设备-150期 09:26:15 请问一下老师,怎么判断一个文本框在录入数据时中间有空格,并且弹出提示,不允许录入这个空格? 二、解决方法:
在文本框的“击键”事件过程下如下代码:
Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = Asc(" ") Then MsgBox "禁止输入空格" KeyAscii = 0 End If End Sub
如 图: