VB 版 (精华区)

发信人: student (earth), 信区: VB
标  题: 深入浅出VB.Net Windows Form-3
发信站: 哈工大紫丁香 (2002年01月26日19:17:47 星期六), 站内信件

向窗体添加控件

　　没有控件的窗体没有丝毫用处，.Net基类提供了大量控件，有button, checkbox, te
xtbox, label等等，对于.Net Framework新手，你一定想知道这些对象的层次结构。举例
而言button控件就如下：

Object
　MarshalByRefObject
　　Component
　　　Control
　　　　ButtonBase
　　　　　Button

　　所有的控件都来源于Control类，将一个控件添加进表单需要三个步骤：

　　　1、宣布控件变量

　　　2、实例化控件


　　　3、将控件增加入表单。

　　由于VB.Net变量范围不一样，若变量在函数内被宣布，那么函数对他是可见的，如果
想让控件对整个类都时可见的，那么就要在类一级宣布他。

　　实例化控件就象实例化其他对象一样，使用new关键字，一旦你有了控件的实例，你就
可以将他添加进表单中。不能将控件直接添加到表单中，因为表单没有Add(Control)方法
。无论如何，form类从control类中继承了control属性，在表单类中，使用这个属性可以
获得表单的System.Windows.Forms.Form.ControlCollection中的对象。Form.ControlCol
lection代表了表单中的控件集合，可以使用add方法向表单增加一个控件，remove方法从
表单中删除一个控件。

　　明白了这三个步骤，下面的例程演示向表单添加控件的过程

'Declare the button
Dim Button1 As System.Windows.Forms.Button
'Instantiate the button
Button1 = New System.Windows.Forms.Button()
'Add the button to the form
Me.Controls.Add(Button1)

　　当然，你可以按照你的想法设置控件的众多属性，而且可以在添加进表单之前或者之
后设置他们的值，但在实例化之前就不能进行设置。控件有诸如left,right,width,heigh
t这样的属性表示他的大小，button控件也有象button对象那样的text属性。

　　下面是添加两个控件到表单中的例子。

Listing 2: Adding controls to a form.

Imports System.Windows.Forms
Public Class Form1
　Inherits Form

　' Control declaration: a Button and a TextBox
　Private Button1 As Button
　Private TextBox1 As TextBox

　Public Sub New()
　　InitializeComponent()
　End Sub

　Private Sub InitializeComponent()

　　Me.Text = "Developer Form"
　　Me.Text = "Developer Form"
　　Me.Width = 400
　　Me.Height = 300

　　Button1 = New Button()
　　TextBox1 = New TextBox()

　　Button1.Left = 200
　　Button1.Top = 200
　　Button1.Width = 100
　　Button1.Height = 40
　　Button1.TabIndex = 0
　　Button1.Text = "Click Me"

　　TextBox1.Left = 200
　　TextBox1.Top = 30
　　TextBox1.Width = 150
　　TextBox1.Height = 40

　　Me.Controls.Add(Button1)
　　Me.Controls.Add(TextBox1)

　End Sub

End Class 

--
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.236.168]