VB.NET面向对象的程序设计语言

类

　　在面向对象编程技术中类是主要的焦点，简单的说，类是一种提供功能的数据类型。在vb.NET中宣布一个类要使用关键字class,比如，list1中就宣布了一个叫employee的类。

Listing 1:Employee类 Class Employee End Class

　　这是一个非常简单的类。注意微软推荐使用Pascal语言对类的命名规则。这就意味着类名的第一个字母必须是大写，并且后来的并发连结词的第个字母均为大写。一个好的类名应该象这样的GeneralManager, SmallDictionary, StringUtil。

　　类成员

　　一个类有象域、属性、子程序和函数那样的成员，比如，list2中employee类中有一个叫work的子程序

Listing 2: Class Employee 　Public Sub Work () 　　' Do something here 　End Sub End Class

　　子程序和函数又叫方法，方法的命名也遵循Pascal命名法。

　　另一个类成员类型是域，域的命名法则遵循camel-case法则，如一个好的域命名象salary 和quarterlyBonus这样，在list3中我们在Employee类中添加了两个域salary和quarterlyBonus

Class Employee 　Dim salary As Decimal = 40000 　Dim yearlyBonus As Decimal = 4000 　Public Sub PrintSalary() 　　' print the salary to the Console 　　System.Console.Write(salary) 　End Sub End Class

　　对象实例

　　一个类是一个模板或代表实体的蓝图。由于要使用类的域、方法或其他成员，你第一次需要将类的观念转变为对象，这样说吧，仅仅是跑车的蓝图是没有用的，除非工程师将蓝图造成车，从另一个方面说，你驾驶的是车而不是蓝图。

　　在面向对象编程中，对象被称为类的实例，因此创建一个对象的过程又被称为实例化。

　　list4示范了实例化employee类

Listing 4: 对象初始化 Class Employee 　Dim salary As Decimal = 40000 　Dim yearlyBonus As Decimal = 4000 　Public Sub PrintSalary() 　　' print the salary to the Console 　　System.Console.Write(salary) 　End Sub End Class Module Module1 　Public Sub Main() 　　Dim anEmployee As Employee 　　anEmployee = New Employee() 　　anEmployee.PrintSalary() 　End Sub End Module

　　Listing 4中的模块Module1中提供了Main sub，在vb.NET程序中Main Sub是整个程序的入口，要编译源程序，那么你就必须提供访问Main Sub的途径。

　　如果你没有使用Visual Studio.NET，那么可以使用vbc.exe 编译vb.NET源程序，vbc.exe 是在安装.NET Framework时自动安装的。举个例子，当你把源代码保存到文件Employee.vb中后，在Employee.vb相同的目录下输入vbc Employee.vb。

　　现在我们回到list4的代码中，在Main sub中声明了Employee类的对象变量，这个变量叫anEmployee.

Dim anEmployee As Employee

　　anEmployee初始化Employeer时必须使用关键字new.

anEmployee = New Employee()

　　现在我们有一个Employeer的对象，你可以使用它的功能了。在我们的例子中，调用了PrintSalary 方法。

anEmployee.PrintSalary()

　　你也可以把Main Sub放在类中，采用这种方法就不需要模块，如list5中所示

Listing 5: Moving the Main sub to the class itself Class Employee 　Dim salary As Decimal = 40000 　Dim yearlyBonus As Decimal = 4000 　Public Sub PrintSalary() 　　' print the salary to the Console 　　System.Console.Write(salary) 　End Sub 　Public Shared Sub Main() 　　Dim employee As Employee 　　employee = New Employee() 　　employee.PrintSalary() 　End Sub End Class

　　注意在PrintSalary 方法中调用了System.Console.Write意味着调用了Console类的write方法并且Console类是System名字空间的一部分，关于名字空间我们将在后面讲述。