按一次on 在按一次off 一直循環 command物件的click()好像按了Value=True<br>改Value=False 好像也沒用 請教各位前輩 THANKS
不知道是不是您要的答案 Private Sub Command1_Click() Static IsDo As Boolean IsDo = Not IsDo If IsDo Then Command1.Caption = "press then not isdo" Else Command1.Caption = "press then isdo" End If End Sub
Private Sub Command1_Click() Command1.Caption = IIf(Command1.Caption = "on", "off", "on") End Sub