以前一直搞不明白VB中的类模块到底是做什么的,这次在敲学生信息管理系统的过程中,才发现它的好处。
举个通俗易懂的例子,VB中的类模块就是用来放VB中公用的代码,都放在这个类模块里面,当用的时候只需要调用即可。就好比我们农村对庄稼浇水似的,都共用一口井。当用的时候,只需要自己动手即可。
牛刀小试:
可以在VB的窗体中加载一个类模块窗体。代码如下:
Public Function Testtxt(txt As String) As Boolean If Trim(txt) = "" Then Testtxt = False Else Testtxt = True End If End Function
以上代码用来判断是否txt这个字符串为空。
接下来,可以在窗体中添加文本框来调用以上函数来判断是否文本框为空。
代码如下:
Private Sub command1_Click() if not testtxt(text1.text) then msgBox "请输入文本" end if end sub
如果我们在应用VB的过程中要加载大量窗体的话,并且需要验证文本框是否为空的状态下,通过类模块定义一个公共代码,会方便很多。以上就是类模块的作用。