VB中的类模块

前端之家收集整理的这篇文章主要介绍了VB中的类模块前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

以前一直搞不明白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的过程中要加载大量窗体的话,并且需要验证文本框是否为空的状态下,通过类模块定义一个公共代码,会方便很多。以上就是类模块的作用。

猜你在找的VB相关文章