例如Private Sub Form_Load()Command2.Visible = False '开始时看不见End SubPrivate Sub Command1_Click()Command2.Visible = True '现在才出现End Sub