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

[µo°Ý] checkbox­«Âаõ¦æ

[µo°Ý] checkbox­«Âаõ¦æ

Hi ¦U¦ì¤j¤j¡A·Q½Ð±Ð¤@¤U
§Ú§Æ±æ¤Ä¿ïcheckbox(checkbox.value = true)«á·|°õ¦æ§Ú­n°µªº¨Æ¡A¦A¨ú®ø(checkbox.value = false)´N¤£°µ¥ô¦ó¨Æ¡A¦A¤Ä¿ïcheckbox(checkbox.value = true)·|¦A°õ¦æ§Ú­n°µªº¨Æ

¦ý§Ú¦pªG¦bµ{¦¡½X¤¤¶¡¥[¤J"do while"¡A´N¥u¦³²Ä¤@¦¸¤Ä¿ïcheckbox®É·|°õ¦æ§Ú­n°µªº¨Æ
Private Sub ddrmaxretrain_Click()
    If ddrmaxretrain.Value = True Then
        Do While maxretrain = ""
            maxretrain = Application.InputBox("DDR Max Retrain Count(1~999)")
        Loop
    Else
    End If
End Sub

¦ý¦pªG¬O¹³³o¼Ë¼gªº¸Ü¡A§Ú¥u­n¤Ä¿ïcheckbox´N·|°õ¦æ°Ê§@¡A¨ú®ø¦A¤Ä¿ï¤@¼Ë³£·|°õ¦æ°Ê§@
Private Sub ddrmaxretrain_Click()
    If ddrmaxretrain.Value = True Then
        maxretrain = Application.InputBox("DDR Max Retrain Count(1~999)")
    Else
    End If
End Sub

¥»©«³Ì«á¥Ñ GBKEE ©ó 2012-10-19 16:39 ½s¿è

¦^´_ 1# xgit0072
·í Application.InputBox("DDR Max Retrain Count(1~999)")  ®É, §AµLªk¥h§@ ¨ú®ø ©Î ¤Ä¿ï ªº°Ê§@

µ{¦¡½X¤¤¶¡¥[¤J"do while"¡A´N¥u¦³²Ä¤@¦¸¤Ä¿ïcheckbox ·|°õ¦æ§Ú­n°µªº¨Æ
¹ï°Ú!¥u­n¬O If ddrmaxretrain.Value = True  ¤Ä¿ïcheckbox

¦ý¦pªG¬O¹³³o¼Ë¼gªº¸Ü¡A§Ú¥u­n¤Ä¿ïcheckbox´N·|°õ¦æ°Ê§@¡A¨ú®ø¦A¤Ä¿ï¤@¼Ë³£·|°õ¦æ°Ê§@ , ¤£·|³o¼Ë§a !
  1. Private Sub ddrmaxretrain_Click()
  2.     If ddrmaxretrain.Value = True Then       '¤Ä¿ïcheckbox
  3.         maxretrain = Application.InputBox("DDR Max Retrain Count(1~999)")
  4.     Else          '¨ú®ø¤Ä¿ïcheckbox
  5.       °õ¦æ³oùص{¦¡½X ......   
  6. End If
  7. End Sub
½Æ»s¥N½X

TOP

¦^´_ 1# xgit0072
Hi, §Ú¤£ª¾¹D§Amaxretrain¬O¥þ°ìÅܼÆÁÙ¬O¨ä¥L±±¨î¶µ
¦ý²Ä¤@¦¸¤Ä¿ïcheckbox«á , maxretrain´N±qinputbox¨ú±o­È(¤w¸g¤£¬O""¤F)
©Ò¥H¨ú®ø«á, ­«¤Ä¿ï´N¤£·|¶i¤J do...loop °j°é ...

¬Ý¬Ý¬O¤£¬O§A­nªº:
Private Sub ddrmaxretrain_Click()
    If ddrmaxretrain.Value = True Then
        Do While maxretrain = ""
            maxretrain = Application.InputBox("DDR Max Retrain Count(1~999)")
        Loop
    Else
        maxretrain = ""
    End If
End Sub

TOP

sorry¡A§Ú¤W­±ªº±Ô­z¥i¯à¤£¬O«Ü²M·¡~~

·í Application.InputBox("DDR Max Retrain Count(1~999)")  ®É, §AµLªk¥h§@ ¨ú®ø ©Î ¤Ä¿ï ªº°Ê§@
-->§Úªº·N«ä¬O»¡¡A·í§Ú¿é¤J§¹¸ê®Æ¡AinputboxÃö±¼«á¡A§Ú§âcheckbox¨ú®ø¡A³o®É·|°õ¦æcheckbox.value=false«áªºµ{¦¡½X

¦ý¦pªG§Ú¦A¥´¤Ä¤@¦¸¡A¥L¤S·|¦A°õ¦æcheckbox.value = true«áªºµ{¦¡½X


1. ¤Ä¿ïcheckbox
2.¸õ¥Xinputbox¡A¿é¤J¸ê®Æ
3.inputboxÃö³¬
4.¦¹®É¤£¤p¤ß«ö¨ìcheckbox¡A¾É­Pcheckbox.value = false
5.§Ú¦A¤Ä¿ï¤@¦¸checkbox-->³o®ÉÀ³¸Ó·|¦A¸õ¥XinputboxÅý§Ú¿é¤J¸ê®Æ

TOP

«D±`·PÁÂstillfish00 ¤j¤j~~

¤§«e¨S¦³·Q¨ì¡A­n§âmaxretrainªº­È²M±¼¡A§A¤@¥y¸Ü´NÂI¿ô¤F§Ú...
¥Î§Aªº¤è¦¡¤w¸g¸Ñ¨M¤F³é!!ÁÂÁ§A!!

TOP

¦^´_ 5# xgit0072
¤£²Mªº¸Ü , while´««á­±¤]¤@¼Ë
Do
        maxretrain = Application.InputBox("DDR Max Retrain Count(1~999)")
Loop While maxretrain = ""

TOP

hi GBKEE ¤j¤j~~
¦]¬°§Ú­n§PÂ_inpubox¬O§_¦³­È¡A©Ò¥H§Ú¤~·|¥[¤Jdo while
©Ò¥H§Aªº¤è¦¡¤£¾A¦X§Ú¥Î!ÁÂÁ°Õ!

TOP

        ÀR«ä¦Û¦b : ¡i¬°µ½Ävª§¡j¤H¥Í­n¬°µ½Ävª§¡A¤À¬í¥²ª§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD