演示VB.NET类定义全过程

开发 后端
本为主要演示了从VB.NET类定义,创建测试类的按钮,VB.NET类定义运行应用程序的全过程,代码清晰完整。以往可以给你带来帮助。

先来说说VB.NET 类的概念,类是具有相同属性和动作的事物的抽象,是面向对象编程的最基本和最核心的概念。类封装了对象的静态特征(即属性)和动态行为特征(即操作或称为方法)。此文演示VB.NET类定义,然后使用这些类创建对象。同时还说明如何为新类添加属性和方法,并演示如何初始化对象。

一.VB.NET类定义

1.单击“文件”菜单上的“新建项目”,创建一个项目。“新建项目”对话框随即出现。

2.从 Visual Basic 项目模板列表中选择“Windows 应用程序”,以显示新项目。

3.在“项目”菜单中单击“添加类”,将一个新类添加到项目中。出现“添加新项”对话框。

4.选择“类”模板。

5.给新类 UserNameInfo.vb 命名,然后单击“添加”以显示新类的代码。

  1. Visual Basic 复制代码   
  2. Public Class UserNameInfo  
  3. End Class 

注意可以使用 Visual Basic“代码编辑器”,在新类的名称之前键入 Class 关键字,将类添加到启动窗体中。“代码编辑器”会提供相应的 End Class 语句。
 

6.在 Class 和 End Class 语句之间加入以下代码,为类定义私有字段:

  1. Visual Basic 复制代码   
  2. Private userNameValue As String 

将字段声明为 Private 意味着该字段只能在该类内使用。可以通过使用提供更大访问权限的访问修饰符(如 Public)来使字段得以从类的外部进行访问。有关更多信息,请参见 Visual Basic 中的访问级别。

7.通过添加以下代码为类定义属性:

  1. Visual Basic 复制代码   
  2. Public Property UserName() As String  
  3. Get  
  4. ' Gets the property value.  
  5. Return userNameValue  
  6. End Get  
  7. Set(ByVal Value As String)  
  8. ' Sets the property value.  
  9. userNameValue = Value  
  10. End Set  
  11. End Property 


8.通过添加以下代码为类定义方法:

  1. Visual Basic 复制代码   
  2. Public Sub Capitalize()'   
  3. Capitalize the value of the property.  
  4. userNameValue = UCase(userNameValue)  
  5. End Sub 

9.通过添加名为 Sub New 的过程为新类定义参数化的构造函数:

  1. Visual Basic 复制代码   
  2. Public Sub New(ByVal UserName As String)  
  3. ' Set the property value.  
  4. Me.UserName = UserName  
  5. End Sub 

当创建基于此类的对象时,会自动调用 Sub New 构造函数。此构造函数设置保存用户名的字段值。

二.创建测试类的按钮

1.右击“解决方案资源管理器”中启动窗体的名称,将启动窗体更改为设计模式,然后单击“视图设计器”。默认情况下,“Windows 应用程序”项目的启动窗体的名称为 Form1.vb。主窗体随即出现。

2.在主窗体中添加一个按钮,然后双击该按钮显示 Button1_Click 事件处理程序的代码。添加下列代码以调用测试过程:

  1. Visual Basic 复制代码   
  2. ' Create an instance of the class.  
  3. Dim user As New UserNameInfo("Moore, Bobby")  
  4. ' Capitalize the value of the property.  
  5. user.Capitalize()  
  6. ' Display the value of the property.  
  7. MsgBox("The original UserName is: " & user.UserName)  
  8. ' Change the value of the property.  
  9. user.UserName = "Worden, Joe" 
  10. ' Redisplay the value of the property.  
  11. MsgBox("The new UserName is: " & user.UserName)  

三.VB.NET类定义运行应用程序

按 F5 运行应用程序。单击窗体上的按钮以调用测试过程。它会显示一则消息,说明原来的 UserName 是“MOORE, BOBBY”,因为该过程调用了对象的 Capitalize 方法。

单击“确定”关闭该消息框。Button1 Click 过程会更改 UserName 属性的值,并显示一则消息,说明 UserName 的新值为“Worden, Joe”。

【编辑推荐】

  1. VB.NET函数宝典手把手教会你
  2. 剖析VB.NET Process的属性与对象
  3. VB.NET SendKeys方法与键入值
  4. 详细说明VB.NET变量中四点
  5. 你是否了解VB.NET集成开发环境
责任编辑:田树 来源: 博客
相关推荐

2010-01-08 14:56:18

VB.NET类定义

2012-11-06 10:19:18

Java自定义加载Java类

2010-01-21 17:39:26

VB.NET运算符过程

2009-10-26 09:50:20

VB.NET Star

2009-11-03 11:06:40

VB.NET事件

2009-10-29 13:46:14

VB.NET DES加

2009-10-27 16:36:46

VB.NET文件流

2009-10-20 09:39:04

VB.NET Butt

2009-10-13 14:50:59

VB.NET Envi

2009-10-20 17:38:54

VB.NET Comp

2010-01-12 16:20:44

VB.NET类

2010-01-15 15:39:14

VB.NET Sub过

2009-11-02 09:45:23

VB.NET文件系统对

2011-02-22 10:46:02

Samba配置

2009-10-23 14:06:07

VB.NET类对象

2009-10-16 10:14:26

VB.NET使用Fil

2009-10-15 10:57:16

VB.NET Text

2010-01-19 17:26:37

VB.NET创建过程

2009-11-02 10:36:16

VB.NET Sub

2010-01-19 09:48:22

VB.NET调用过程
点赞
收藏

51CTO技术栈公众号