ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

CommandButton click ¼vÅT¥t¤@­ÓCommandButton

CommandButton click ¼vÅT¥t¤@­ÓCommandButton

°²³]§ÚªºCommandButton1_click¤U¤wIJµo¨Æ¥ó¡A
½Ð°Ý§Ú­n¦p¦ó§Q¥ÎCommandButton2_click¨Ó§ïÅÜCommandButton1ªºclick¨Æ¥ó

³Â·Ð¦U¦ì¤F

¦^´_ 1# Deovnigl
­n§ïÅܤ°»ò¨S»¡²M·¡!!!
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

³á³á    ©êºp©êºp
§Ú¶K§Úªº­ì©l½X¬Ý¬Ý
Private Sub CommandButton1_Click()
  Call sndPlaySound("C:\Users\Desktop\wav\bee.wav", SND_ASYNC)
End Sub
³oÃä¬OCommandButton1ªº²Ä¤@­Óclick¨Æ¥ó
§Ú·Q°Ýªº¬O§Ú¥i¥H§Q¥Îclick CommandButton2¨Ó§ïÅÜCommandButton1ªºclick¨Æ¥ó¶Ü?

§Yclick button2 «á  §ïÅÜbutton1ªº¼½¥X­µÀɨӷ½


¤£¦n·N«ä¨S¦³´y­z²M·¡  <(_ _)>

TOP

¦^´_ 3# Deovnigl
¥i¥ÎºX¼Ð¨Ó§PÂ_¡G
  1. Dim flag As Boolean

  2. Private Sub CommandButton1_Click()
  3.   Call sndPlaySound("C:\Users\Desktop\wav\" & IIf( flag = False, "bee.wav", "dog.wav"), SND_ASYNC)
  4. End Sub

  5. Private Sub CommandButton2_Click()
  6.     flag = Not flag
  7. End Sub
½Æ»s¥N½X

TOP

¦^´_ 3# Deovnigl
ªþ¤W´ú¸Õ½d¨Ò¡G
  1. Dim flag As Boolean

  2. Private Sub CommandButton1_Click()
  3.     MsgBox "Hi!  Right now it's " & IIf(flag = False, "False", "True")
  4. End Sub

  5. Private Sub CommandButton2_Click()
  6.     flag = Not flag
  7. End Sub
½Æ»s¥N½X

TOP

¦^´_ 5# c_c_lai

ÁÂÁ±z~~~
ÁÙ¶K¤ßªº¥Î¨Ò¤l
¯uªº«Ü·PÁ§A!!!

TOP

        ÀR«ä¦Û¦b : ±o²z­nÄǤH¡A²zª½­n®ð©M¡C
ªð¦^¦Cªí ¤W¤@¥DÃD