VB6总结V

一.类

1.VB6中的类需要在类模块中添加，类模块的名称就是类的名称

2.在类模块中声明变量可以用Private (Dim) 和Public

Private声明的变量只能在类的内部被访问，在外部是不可见的

Public声明的变量在外部是可见的，即在外部可以直接修改类中的变量，这就可能造成一些错误

二.类的声明

方法1：Dim cAnimal As Animal  '声明对象变量

            Set cAnimal=New Anial  ‘适当时候将其实例化(可以控制实例化类的时间和场合)

方法2：Dim cAnimal As New Animal  ‘声明对象变量且将其实例化

三.类的销毁

因为每一个类都要占用一定的资源，所以当不需要这些类的时候，需要释放它们所占用的资源。即

Set cAnimal=Nothing

四.举例说明类的使用

1.添加一个class module，并命名为clsDefaultFollowUp

2.在clsDefaultFollowUp中添加如下代码

Private a As String, b As String, c As String

Public Sub SetA(ByVal strA As String)
   a = strA
End Sub

Public Function GetA() As String
  GetA = a
End Function

Public Sub SetB(ByVal strB As String)
   b = strB
End Sub

Public Function GetB() As String
  GetB = b
End Function

Public Sub SetC(ByVal strC As String)
   c = strC
End Sub

Public Function GetC() As String
  strC = c
End Function

3.在form中调用clsDefaultFollowUp，实现grid中显示需要的数据