Private Sub Command1_Click()
   Label1.Caption =“thanks for your attendance！”   
   Command1.Enabled = False
   Command1.Enabled = True
End Sub
  
Private Sub Form_Load()
  Label1.Caption=“欢迎光临！”  
  Command2.Enabled = False
End Sub