作者:绿色风
分类:
时间:2022-08-17
浏览:143
楼主 0Mouse |
Q:限制用户窗体上的文本框只能输入2、5或者8的VBA代码怎么写呢? A:思路:通过MaxLength属性限制只能输入1位,启用Change事件对文本框输入内容进行判断,凡是不为2、5或者8的内容均予以清空处理。用户窗体内的代码如下:- Private Sub UserForm_Initialize()
- TextBox1.MaxLength = 1
- End Sub
- Private Sub TextBox1_Change()
- With TextBox1
- Select Case .Text
- Case "2", "5", "8" '列出允许输入的字符。
- Case Else
- Beep
- .Text = "" '如果输入的不是允许的字符,则清空。
- End Select
- End With
- End Sub
附件:
限制文本框只能输入2、5或者8.rar |
2楼 eliane_lei |
V白,进来学习! |
3楼 热火冰心 |
|
4楼 0Mouse |
本例代码可行,不过还是偏复杂了,可以看看弦月版主的这个帖子! VBA限制窗体TEXT控件输入内容的一个综合示例 http://www.exceltip.net/thread-33995-1-1.html
|
5楼 老糊涂 |
|
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素,
经与ExcelTip.Net站长Apolloh商议并征得其同意,
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示,
供有需要的人士查询使用,也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议,
可与本人沟通提出,或于本站点留言,我们会尽快处理。
在此,感谢ExcelTip.Net站长Apolloh的支持,感谢本站点所有人**绿色风(QQ:79664738)**的支持与奉献,特此鸣谢!
------本人网名**KevinChengCW(QQ:1210618015)**原ExcelTip.Net总版主之一