一、新建类级变量
Private T3 As TextBox
'加上 WithEvents 修饰就是说这个 T3 拥有了 TextBox 这种类型的属性和方法。
二、实例化后即可使用
If T3 Is Nothing Then
T3 = New TextBox
Me.Controls.Add(T3)
T3.Left = 20
T3.Top = 20
T3.Width = 100
T3.Visible = True
End If
三、因为是类级变量,所以可以在该类域里直接调用
msgbox(T3.Text)