VB6.0类如何调用类

Question

FORM:
Private Sub Command1_Click()
Class myclass1 = New myclass
MsgBox (myclass1.Data)
End Sub
然后想调用自己建立的类:myclass
程序出错.
子程序或函数没有定义

Answer 1

在 VB 工程中添加一个类模版，把该模版命名为: myclass，然后输入以下代码：

public function Data() as String
Data="初学者"
end function

然后改你的代码：

Private Sub Command1_Click()
Dim myclass1 As New myclass
MsgBox (myclass1.Data)
End Sub

这样就可以了

Answer 2

哈哈哈。首先你要用到类，才能知道类是干啥的。