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

½Ð°Ýcheckbox¦h­«¿ï¾Üªº°ÝÃD

½Ð°Ýcheckbox¦h­«¿ï¾Üªº°ÝÃD

¥»©«³Ì«á¥Ñ eric6211 ©ó 2021-5-26 23:51 ½s¿è

½d¨Ò.rar (17.31 KB)
¦U¦ì«e½ú¦n
¤p§Ì­n°µ¤@­Óªí³æ,¥i¥H§Q¥Îcheckbok¦h¶µ¿ï¾Ü
¥Ø«e¥u¦³¥Îif ªº¤½¦¡ªºªº­n§PÊÈ
¨Ò¦p
If CheckBox1.Value = True And CheckBox2.Value = True And CheckBox3.Value = False Then

TextBox1 = "¤@¡B" & A & vbCr & _
"¤G¡B" & B

¦ý¬O3 ­ÓÁÙ¦n
¦pªG­n°µ¨ì5­Ó©Î¨ì10­Ó¿ï¶µ[
´N­n¼g¶W¦hªºif§PÂ_¦¡
½Ð°Ý¦³¨ä¥L¤è¦¡¥i¥H¼g¶Ü

ÁÂÁÂ

½d¨Ò1.rar (15.89 KB)
¦U¦ì¤j¤j
§Úª¦¤å¬Ý¨ì¸Ñ¨Mªº¤è¦¡
ÁÙ¦³¤@°ÝÃD
¦pªG¤Ä¿ïcheckbox«á­n¦³§Ç¸¹
¦p
1.¤é¥»
2.¬ü°ê
¤Î
1.¤é¥»
2.Áú°ê
½Ð°Ý­n¦p¦ó¼g
ÁÂÁÂ

TOP

¦^´_ 2# eric6211

mystr = IIf(mystr = "", Ct.Caption, mystr & "¡C" & vbCr & Ct.Caption)

³o¬q§ï¤@¤U  ¸Õ¸Õ¬Ý ·PÁÂ
K = K + 1
mystr = IIf(mystr = "", K & "." & Ct.Caption, mystr & "¡C" & vbCr & K & "." & Ct.Caption)

TOP

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