博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

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 Main()

        '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键关闭程序