求大侠指点窗体文本框禁止输入空格代码

久石让的粉丝　发表于：2015-09-16 12:09:45 　

if isnull(me.控件） or me.控件="" then

msgbox ("必填项")

end if

以上代码不能解决只输入空格报错

如果文本框输入N个纯空格（如：“ ”）

Msgbox代码报错

如果文本框输入前后有空格（如：“ 速递fdsi ")

取有效字符（“速递fdsi”）

求代码

丘山发表于：2015-09-16 12:35:13

用replace函数替换

zzwjj 发表于：2015-09-17 09:50:28

不知道是只输入字符的开头或者结尾不允许有空字符,还是输入过程中不允许有空字符.......如果是开头结尾去空的话可以用trim()函数.也就是Tirm(me!控件名)就可以去除前面或者是后面的空格.....

金宇发表于：2015-09-17 22:40:03

if InStr(Me.控件名称, Chr(32))>0 then

msgbox "文本框中包含有空格！"

end if

总记录：3篇页次：1/1 9 1 :

Access交流中心