【简答题】

Private Sub Command1_Click()
    Text1 = Combo1.Text
'    Command2. ?  = True
End Sub
Private Sub Command2_Click()
'    Combo1.List( ? ) = Text1
    Text1 = ""
    Command2.Enabled = False
End Sub
Private Sub Command3_Click()
'    ?  Text1
End Sub