利用类方法 文本框事件
![利用类方法 文本框事件](http://img.jiangsulong.com/220403/11413634c-0.jpg)
文章插图
文本框事件(使用类方法)
大家好 , 今天继续讲解上课的方法和事件 。至此 , 我们已经基本学会了如何使用类 , 以及如何使用类的事件 。
如果要使用一个类 , 必须在类模块中构建一个类 , 类的名字可以改成你需要的形式 。类建立后 , 需要实例化类 , 把它变成一个相对的实体对象 。如果类没有实例化 , 它就没有意义 。一般来说 , 你可以在构造窗体时实例化该类;如果想让这个实体对象响应类的事件 , 应该在类声明中声明对象 , 在类模块中响应事件 , 在表单模块的信息资源网络中对对象进行必要的关联 。
下面还是以实例来说明类模块的实际问题 。
示例:在表单中 , 让每个文本框在被激活时改变颜色 。
思路分析:让表单中的文本框关联同一个类 , 可以执行统一的类事件 。在表单中 , 将必要的文本框与该类和将执行响应的类事件相关联 。
实施流程:
建立一个类模块和类事件 。
我们建立了一个类模块mytebox 。并在类模块中声明一个响应事件的对象Mbox , 作为我们要在文本框中介入的一组对象 。
作为MSForms的公共WithEvents mBOX 。文本框
私有Sub mBOX_Change()
m = mBOX 。文本
如果m = " "那么m = 0
如果m > 100 , 则
MsgBox("已超过100"): Dovents
如果…就会结束
末端接头
private Sub mBox _ MouseDown(ByVal Button为整数 , ByVal Shift为整数 , ByVal X为Single , ByVal Y为Single)
对于i = 2到4
使用UserForm7 。控件(“文本框”和I)
。ForeColor = 0 '(黑色)
。BackColor = 16777215 '(白色)
TT = 。文本
以…结尾
然后
MBOX 。BackColor = 16711680 '(蓝色)
MBOX 。ForeColor = 16777215 '白色
末端接头
1在上面的代码中 , public withevents mbox as ms forms . textbox声明了应该响应类对象事件的对象 。
上面的对象有两个事件 , 一个是mBOX_Change , 另一个是mBox_MouseDown 。
【利用类方法 文本框事件】我们来看第一个事件mBOX_Change 。当对象改变时 , 将执行以下操作:
m = mBOX 。文本
如果m = " "那么m = 0
如果m > 100 , 则
MsgBox("已超过100"): Dovents
第一 , mBOX的价值 。文字要拿出来评判 。如果是空 , 则视为0;大于100会有提示 , 已经超过100了 。
4 mBox_MouseDown过程 。
对于i = 2到4
使用UserForm7 。控件(“文本框”和I)
。ForeColor = 0 '(黑色)
。BackColor = 16777215 '(白色)
TT = 。文本
以…结尾
然后
MBOX 。BackColor = 16711680 '(蓝色)
MBOX 。ForeColor = 16777215 '白色
对于第二个到第四个文本框 , 首先初始化每个文本框 , 然后给活动文本框着色 。背景是蓝色 , 前景是白色 。
运行时窗体的接口:
今天的内容回报:
对象如何响应类1的事件?
2类事件声明后 , 如何应用?
(未完待续)
-信息资源网————————————————————————————————
学习有用的东西需要一种永不满足的精神 , 知道自己需要什么 , 而不是蜷缩在一个自以为是天堂的小世界里 。等到老了再发表自欺欺人的言论 。努力提升自己 , 拥有一颗充满活力的心 , 把握当下 , 这就是进取 。越是有意义的事情 , 困难就越多 。愿自始至终坚定 , 智慧决定成败 。不管遇到什么 , 都是风景 。看淡纷争 , 看淡得失 。茶 , 满还是少 , 不在乎;不管是浓还是淡 , 都有自己值得品尝的味道 。感受真实的时候 , 静下心来 , 多学习 , 多积累祝福 。而不是天天混日子 , 也不是天天坐以待毙 。在后疫情 , 更厉害的杀股世界 , 为自己的生存储备知识 , 尤其是新知识 。
VBA是利用Office实现自己小型办公自动化的有效手段 。根据我在VBA 20多年的实践经验 , 我现在介绍五个VBA教程 。一、VBA码解答是VBA各知识点的讲解 , 涵盖了绝大多数VBA知识点;其次 , 数据处理专业工具VBA数据库解决方案详细介绍了用ADO连接ACCDB和EXCEL的方法和实例 。第三:VBA数组和字典解决方案 , 解释数组和字典在VBA的使用 。这是提高词典VBA码水平的一种手段 , 值得深入研究 。第四 , VBA码解的视频是针对初学者的视频讲解 , 可以快速入门 , 更快掌握这项技能 。第五 , 《VBA的阶级解读与利用》是一门高级课程 , 对我本人理论的完善非常有益 。上述教程可以按照1 , 3 , 2 , 5或4 , 3 , 2 , 5的顺序逐步学习和利用 。
推荐阅读
- 加强医院文化建设的意义 医院文化建设的内容和方法
- 奶枣不用棉花糖的制作方法 奶枣可以用彩色棉花糖吗
- “屏幕使用时间”密码忘记了咋办?找回密码的最新方法来了
- 抖音上了热门后为什么突然限流了,抖音被限流的原因和解决方法
- 六大茶类 谁居琅玡榜首
- 铁观音文丛书法类首发
- 酒的种类有哪些 酒的种类有多少
- 高官与风水 利用风水催官运
- 化煞方法有什么 家居风水化煞解析
- 春季家庭预防感冒方法