VB中怎么实现光标离开Text控件时对其进行检测？
就像网页TEXT中的功能一样，TEXT1中我想输入身份证号，当我填写完毕后，再添别的选项（也就是当光标从Text1离开了），这个时候我想判断TEXT1中是否是18位的字符...
就像网页TEXT中的功能一样，TEXT1中我想输入身份证号，当我填写完毕后，再添别的选项（也就是当光标从Text1离开了），这个时候我想判断TEXT1中是否是18位的字符，怎么实现？
展开
展开全部
Private Sub Text1_LostFocus()
If Len(Text1.Text) <> 18 Then
MsgBox "身份证错误，不够18位"
End If
End Sub
If Len(Text1.Text) <> 18 Then
MsgBox "身份证错误，不够18位"
End If
End Sub
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
微测检测5.10
2023-05-10 广告
您好！建议咨 深圳市微测检测有限公司，已建立起十余个专业实验室，企业通过微测检测就可以获得一站式的测试与认 证解决方案；(EMC、RF、MFi、BQB、QI、USB、安全、锂电池、快充、汽车电子EMC、汽车手机互 联、语音通话质量），认证遇...
点击进入详情页
本回答由微测检测5.10提供
展开全部
if len(text1)<>18 then
msgbox"身份证错误，不够18位"
endif
msgbox"身份证错误，不够18位"
endif
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
if len(text1.text)<>18 then
msgbox"身份证错误，不够18位"
end if
msgbox"身份证错误，不够18位"
end if
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
