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

Ãö©óMsgBoxµøµ¡~¬°¤°»ò·|¸õµ¡2¦¸?

Ãö©óMsgBoxµøµ¡~¬°¤°»ò·|¸õµ¡2¦¸?

Private Sub CheckBox51_Click()
    MsgBox ("¯Ê³f¤¤")
    CheckBox51.Value = False
End Sub

¦^´_ 1# av8d


    ­è´ú¸Õ¤F¤@¤U~³o¼Ë´N¤£·|¸õµ¡2¦¸¤F
  1. Private Sub CheckBox51_Click()
  2. If CheckBox51.Value = True Then
  3.     MsgBox ("¯Ê³f¤¤")
  4.     CheckBox51.Value = False
  5. End If
  6. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ­ì½Ì§O¤H´N¬Oµ½«Ý¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD