这一次的知识和经验在你下一次的项目中没有用到,我感觉这次的努力就白费了或者说你成长的不会太快。为了提醒自己在下一次机房的时候可以用到这次机房总结的好的知识点和经验,这篇总结特地命名——第二遍机房用到(知识点)。
这次在看vb视屏的时候学到一个类control。这是vb内部控件集合的类,本人现在知道的他的功能1、动态添加控件 2、厉遍窗体控件。
现在介绍一下以后机房中一定要用的功能——厉遍控件。
在做机房的时候同学们肯定用这样的感受:一个窗体中文本框太多,即使在模块中已近写类了,但是要判断哪个文本框为空还是要逐一的在判断哪个文本为空。
这时要是有在模块中写一个过程,在每个不同的窗体中只要写一段代码。就能解决所有问题那该多好 啊!现在我就来给你介绍一个好方法。
在模块中写下面的代码:
Public Function frm(i As Form) As Form
For Each Control In i.Controls
If TypeOf Control Is TextBox Then
If Control.Text = "" Then
MsgBox Control.Name & "为空"
End If
End If
Next Control
End Function
然后在需要判断的对象事件下写:
Set i = frm(窗体名)
只要这几行代码,就问题就解决了。
进提高班一年了,米老师一直强调思想比技术更重要。以前以为思想只能在平时做事中体现出来,现在自己自己感觉思想也可以通过代码体现出来。相同的技术,不同思想的人可以写出不同的效果。昨天 看米老师推荐的博客,评论中别人说写代码很累,而成云姐却说写代码是一种思想,是一种享受(不是原话)。现在本人也有这样的感觉,我只想说:我爱编程。