1.创建一个新项目和Car类
(1) 运行VisualBasic2008,菜单|新建项目(File|New Project)
(2) 选择Console Application模板(控制台应用程序模板),并输入新项目的名称Objects,创建项目。
(3) 现在需要创建一个新类。这就要使用Solution Explorer,右击Objects项目并选择Add|Class。打开的对话框提示输入新类的名称,输入Car.vb并单击Add按钮。在Solution Explorer中添加了这个新类,并且编辑器中现在显示的事该类的代码,不过,此时的编辑器中没有显示任何代码。
2.创建对象并添加color属性
(1)在Car类中添加如下代码:
Public Color As String
(2)这就完成了!下面需要使用类看看该属性如何工作。打开Module1.vb文件,并添加如下代码:
Sub
'Create a new car object
'创建一个新的汽车对象
Dim objCar As New Car
'set the Color property to Red
'颜色属性赋值为红色
objCar.Color = "Red"
'Show what the value of the property is
'展示属性的值
Console.WriteLine("My car is this color:")
Console.WriteLine(objCar.Color)
'Wait for input from the user
'等待用户的输入
Console.ReadLine()
End Sub
(3)单击工具栏上的Save All按钮保存该项目
(4)运行该项目,会显示一个新窗口,如图所示
(5)按Enter键关闭程序