设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1855|回复: 1
打印 上一主题 下一主题

[窗体] 在文本框输入时如何限制输入的字节数?

[复制链接]
跳转到指定楼层
受到警告 1#
发表于 2012-1-17 16:24:22 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 licho 于 2012-1-17 16:51 编辑

如题,想写段代码限制输入长度,
输入的内容可以是任意字符,除中英文外也可能有标点符号,想通监测输入的字节数来判断;
开始用过LenB与Len的方法,但对Access无效,据了解Access是以1个字符作为2字节处理的;
用Msgbox LenB() 与Msgbox Len()显示的值是一样的;

再后来,在网上找用lstrLen来实现,先将其代码放上来好说话:

Option Compare Database                                                                           
'字符字节数API函数                                                                 
Private Declare Function lstrLen Lib "kernel32" Alias "lstrlenA" (ByVal lpString As String) As Long
                                                                                                                                               
Msgbox strLen(text0)      
                                                                                                                       

把Msgbox strLen(text0) 放在按钮click事件里还可以,但因我是实时监测的,要放在文本框Text0的Change事件中,
这下问题出来了, strLen()可能要在静态时才能用,动态时就出问题了!

有谁知道如何实现吗? 棒棒我!{:soso_e150:}
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2012-1-17 17:22:38 | 只看该作者
在文本框的有效性里进行设置Len。如果不希望客户输入中文,则修改IME为False。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-25 07:19 , Processed in 0.100759 second(s), 25 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表