GBKEE

¦^´_ 10# av8d
ªí³æ¤¤¦³  CommandButton1 , Label1 , TextBox1
ªí³æµ{¦¡½X

1. Option Explicit
   
2. Dim AR()
   
3. Private Sub CommandButton1_Click()
   
4.     MsgBox Join(AR, Chr(10))
   
5. End Sub
   
6. Private Sub UserForm_Initialize()
   
7.     AR = Array(Label1, "¥Ò", TextBox1, 0)
   
8.    Label1.Caption = "THE_Caption"
   
9. End Sub

½Æ»s¥N½X