| | | 类的建立 | | 2001-02-23·
·adding··yesky
| 1 2 3 下一页 在本节中,我们来实践一下。首先创建一个COM对象,然后使用它,最后再想法改进。
首先进行下面两步:
运行Visual Basic;选择 "Standard EXE"工程类型;由于COM对象是基于类的,而类实际上是程序包,就像模块中的代码一样。所以:
选择"Project"->"Add Class Module";当相应的对话框出现后,选择"'Class Module",然后单击"Open"按钮。
这样,在桌面上显示一个表单,以及包含在工程Project1中的Class1。
下面再将空的类的类名更改:
在类的属性窗口中,将类的Name属性改成CDog。
需要说明的是,为了区别起见,每个对象名的前面都有相应的前缀,例如Text Box对象前是"txt"、Form前是"frm"、类前可以大写字母"C"或小写字母"cls",但这里使用前者。
下面我们添加一些代码来测试一下:
在CDog类通用声明部分中,添加变量的声明:
Public Name As String
然后,
打开Form1;
在表单中添加一个命令按钮;
打开代码窗口,为该命令按钮添加下列代码:
Dim MyDog As CDog
Set MyDog = New CDog
MyDog.Name = "Billy Moore"
MsgBox MyDog.Name
Set MyDog = Nothing
1 2 3 下一页 | | | 感谢
访问天极网,如果您觉得该文章涉及版权问题,请看这里!
|
|