体中的位置以免重叠。
在 Form2 中添加一个简单文本框,按照默认值命名为 TextBox1
把下列代码添加到 Form2 的“End Class”前面 (在“解决方案资源管理器”中按右键单击 “Form2”-> “查看代码”,再粘贴下列代码):
Public Property CustomerName() As String
Get
Return TextBox1.Text
End Get
Set(ByVal Value As String)
TextBox1.Text = Value
End Set
End Property
接下来要做的是:
a. 切换到 Form1 的代码,在 “Inherits System.Windows.Forms.Form” 后面增加一行:
Dim myForm2 As New Form2()
b. 在 Form1 中双击Button1 按钮,在它的 Click 事件处理
程序代码中输入下列代码:
myForm2.CustomerName = "Fred"
myForm2.Show()
c. 在 Form1 中双击Button2 按钮,在它的 Click 事件处理
程序代码中输入下列代码:
MessageBox.Show(myForm2.CustomerName)
myForm2.CustomerName = "Joe"
d. 按 F5 运行项目,并点击窗体中的 Button1 和 Button2 按钮,以观察代码运行情况。
表面看来,通过 CustomerName 属性来访问 Form2 与直接访问 Form2 非常相似。然而,这种间接的窗体访问方式能够带来很多好处,其中最重要的一点就在于它实现了更高的抽象性。换言之,哪怕你不知道 Form2 中控件的任何细节 (比如:窗体中是否包含 textbox 控件) ,也能与 Form2 交换数据;你所要做的只是读取或设置 CustomerName 属性值而已。有了这种抽象,你就能在修改 Form2 的实现时不影响项目中的其它代码,因而大大简化了整个项目代码的维护。单从本文的例子来看,这种基于属性的窗体编程模式似乎并不比常规方式简单。然而,它以属性的形式隐藏了窗体的全部细节,故能用简洁、一致的代码来访问窗体。所以,它在一些相当复杂的用户界面编程中能够大显身手。总而言之,通过属性值来访问窗体及其控件的编程模式虽然不太直观,却对
程序员很有价值:它不但比直接访问窗体的编程模式来得更专业,而且让整个项目的代码清晰易读。
结论
Visual Basic .NET 取消了早期版本中的“默认窗体实例”,却引起了不少 .NET 编程新手的困惑。Visual Basic .NET 规定,只有通过引用窗体实例,才能访问窗体的属性、方法及其控件。你所保存的窗体实例指针应该尽量让整个项目都能直接访问到它。Visual Basic .NET 的窗体处理机制已经变得更合理、更强大,可对于刚接触 .NET 的
程序员来说,它的改进偏偏是造成许多困惑的根源。