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

[µo°Ý] ¦³Ãö¿ï¨ú¤è¶ô

[µo°Ý] ¦³Ãö¿ï¨ú¤è¶ô

½Ð°Ý¤@¤U, ­Y¦bªí®æ¤¤,§Ú·Q­n»s§@¿ï¨ú¤è¶ô,·íÂI¿ï¤@­Ó¶µ¥Ø«eªºªÅ¥Õ®æ,´N·|¦Û¤v¥´"V", ³oºØ¿ï¨ú¤è¶ô­n¦p¦ó»s§@

¶}µo¤H­û=>´¡¤J

TOP

¦^´_ 2# ANGELA


    ¹ê¦b«Ü©êºp,§Ú¤£À´¼Ó¤W¤j¤jªº¦^ÂÐ,¯à³Â·Ð¦A»¡©ú¶Ü?

TOP

¦^´_ 3# ClareWu


   

TOP

¥»©«³Ì«á¥Ñ mark15jill ©ó 2011-6-2 13:08 ½s¿è

¦^´_ 1# ClareWu

­è­è§@¤F¤@­Ó ¥i¥H¥Î
¥ý¬Ý¬O¤£¬O±z­nªº

§@¥Î
¦pªG a2Àx¦s®æ = ªÅ¦r¦ê «h checkbox1 «h¬°®Ö¿ï §_«h  ¤£®Ö¿ï

¸ÑÄÀ
¦¹µ{¦¡ ¬O¥Î ¬¡­¶Ã¯¤º®eÅܧó¥\¯à  ¤£¥Î啓°Ê¥¨¶°  ª½±µ¥H A2 °Ê§@
¥N½X
  1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  2.     If Range("a2").Value = "" Then
  3.         CheckBox1.Value = True
  4.     Else
  5.         CheckBox1.Value = False
  6.     End If
  7. End Sub
½Æ»s¥N½X
ªþÀÉ
    ªÅ¥Õ®Ö¿ï.rar (9.67 KB)

©µ¦ùÀ³¥Î
¦pªG a2+b2 = c2 «h checkbo1¬°®Ö¿ï  §_«h checkbox2¬° ®Ö¿ï
  1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  2.     If Range("c2").Value = Range("a2").Value + Range("b2").Value Then
  3.         CheckBox1.Value = True
  4.         CheckBox2.Value = False
  5.         
  6.     Else
  7.         CheckBox1.Value = False
  8.         CheckBox2.Value = True
  9.     End If
  10. End Sub
½Æ»s¥N½X
ps ¦¹©«À³¸ÓÂkÃþ©ó EXCELµ{¦¡°Ï¤~¹ï..

TOP

³o¬O§Ú­nªº¤º®e,¥i¬O¬°¤°»ò§Ú®Ö¨ú¤è¶ô«á·|¸òµÛ"®Ö¨ú¤è¶ô"³o¼Ëªº¦r²´?
¥t¥~¦A½Ð°Ýªí³æ±±¨î¶µ¸òActivated ±±¨î¶µ¦³¤°»ò¤£¦P©O?

TOP

¥t¥~,¦pªG§Ú­n¦b®Ö¨ú¤è¶ô¥~­±¥[®Ø½u,¸Ó«ç»ò°µ©O?

TOP

¥»©«³Ì«á¥Ñ mark15jill ©ó 2011-6-2 13:53 ½s¿è

¦P¼Ëªº·N«ä ´î¤Ö¤À¦¨¨â©«µo°Ý...
¥i¥H¾A·í¥Î½s¿è ¨Ó¥[¥H©µ¦ù°ÝÃD
­n§ï¦WºÙªº¸Ü
¶}µo¤H­û-> ³]­p¼Ò¦¡-> ¿ï¾Ücheckbox ->ÄÝ©Ê ->captionªº¨ºÃä ­×§ï¦¨§A­nªº¦WºÙ

­n§ï®Ø½uªº¸Ü
¶}µo¤H­û-> ³]­p¼Ò¦¡-> ¿ï¾Ücheckbox ->ÄÝ©Ê ->shadow ¿ï¾Ü true §Y¥i§e²{¥ßÅ骬®ÄªG


"¥t¥~¦A½Ð°Ýªí³æ±±¨î¶µ¸òActivated ±±¨î¶µ¦³¤°»ò¤£¦P©O?"
³o­Óªº¸Ü  ¥i¥H°Ñ¦Ò¥H¤Uºô­¶

ActiveX±±¨î¶µ
http://140.130.192.1/ebook/VB6_1/17.htm


ªí³æ±±¨î¶µ
http://msdn.microsoft.com/zh-tw/library/cc295438.aspx

TOP

        ÀR«ä¦Û¦b : ¤H¥Í¨S¦³©Ò¦³Åv¡A¥u¦³¥Í©Rªº¨Ï¥ÎÅv¡C
ªð¦^¦Cªí ¤W¤@¥DÃD