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

[µo°Ý] ¥Á°ê¤é´ÁÂà¦è¤¸¤é´ÁÀË®Ö

[µo°Ý] ¥Á°ê¤é´ÁÂà¦è¤¸¤é´ÁÀË®Ö

¥»©«³Ì«á¥Ñ dou10801 ©ó 2021-7-1 16:20 ½s¿è

½Ð±Ð¦U¦ì¥ý¶i,¥Á°ê¤é´ÁÂà¦è¤¸¤é´ÁÀË®Ö,¦pªG¤é´Á¤£¥¿½T¦p¦ó¸õ¦^­ì¨Óªº¦ì¸m,­«·s¿é¤J,·PÁÂ.

¥Á°ê¤é´ÁÂà¦è¤¸¤é´ÁÀË®Ö.rar (18.8 KB)

§ù¤p¥­

¥»©«³Ì«á¥Ñ singo1232001 ©ó 2021-7-2 20:25 ½s¿è
¦^´_  singo1232001 ·PÁ ¼öª¯¼y¤j¤j«ü¾É,¥B¤º®e§¡¦³µù¸Ñ,¸ß°Ý¤@­Ó°ÝÃD,µ¹§Ú«Ü¦h«ä¸ô,Áö¤£¯à§¹¥þ¤F¸Ñ¤º½X§t ...
dou10801 µoªí©ó 2021-7-2 09:48


     Controls(Replace(da, "textBox", "Label", , , vbTextCompare)).Caption = CDate(t)

    da ¬O¥Ñ¤å¦r¤è¶ô¨Æ¥óIJµo¶Ç¹L¨Óªºname   ¤ñ¦p"textbox101"

    ¤¤¶¡ªº Replace(da, "textBox", "Label", , , vbTextCompare)
    replace ±Ntextbox101 ¤å¦r ¨ú¥N¦¨ label101 ¤å¦rªº·N«ä
                                                                              vbTextCompare ¥Nªí¤£°Ï¤À¤j¤p¼g ÁקK¤j¤p¼g·|¥X¿ù

    ©Ò¥H´NÅܦ¨
    Controls(Label101).caption = CDate(t)   
    ³Ì«á·N«ä´N¬O
    Label101.caption = CDate(t)

TOP

¦^´_ 10# dou10801

¦h¥[¤@­Ó«ü¥O¸û§´:
Lab_Msg.Caption = "": Cancel = False '¥[¬õ¦â³o¤@¬q

TOP

¦^´_ 10# dou10801


´N¬O·í¤U¾Þ§@ªº±±¶µ, »Pactivecell, activesheet¬Û¦P, ¥i¤£¶·«ü©w¦WºÙ~~

TOP

¦^´_ 9# ­ã´£³¡ªL ·PÁ ­ã¤j«ü¾É,¨ä¤¤ActiveControl = "" ÄÝ©Ê,¬O¨º­Ó±±¥ó,¨ä§@¥Î¬°¦ó,ÁÂÁÂ.
§ù¤p¥­

TOP

¥ÎLab¥N´Àmsgbox
Xl0000636.rar (16.56 KB)

TOP

¿é¤J¿ù»~®É,ªð¦^¿é¤J®æ
__¥Îmsgbox«á, ¾nÂI·|®ø¥¢(¨S¦³°{Ã{), ÁÙ¬O­n¦AÂI¤@¤U¿é¤J®æ!!!

TOP

¦^´_ 6# singo1232001 ·PÁ ¼öª¯¼y¤j¤j«ü¾É,¥B¤º®e§¡¦³µù¸Ñ,¸ß°Ý¤@­Ó°ÝÃD,µ¹§Ú«Ü¦h«ä¸ô,Áö¤£¯à§¹¥þ¤F¸Ñ¤º½X§t·N,¦ý·|¤@¤@¾Ç²ß,ºCºC®ø¤Æ,¨ä¤¤,Controls(Replace(da, "textBox", "Label", , , vbTextCompare)).Caption = CDate(t) '±N¥¿½T¤é´Á©ñ¸mlabel101~103,ÁÙµLªk¿Ä·|³e³q,·q½Ð¤j¤j,«ü¾É.
§ù¤p¥­

TOP

¦^´_ 5# singo1232001


    v5 bug ¤w­×¥¿

¥Á°ê¤é´ÁÂà¦è¤¸¤é´ÁÀË®Öv5.zip (25.27 KB)

TOP

¥»©«³Ì«á¥Ñ singo1232001 ©ó 2021-7-2 08:35 ½s¿è

¦^´_ 4# singo1232001

³o­Óª©¥»¤£¦P ·Æ¹«¨Ã¤£·|³Q¸j¦í  enter»Ptab·|³Q¸j¦í
¬Ý³ß¦n¿ï¾Ü

¥t¥~¸É¥R
ÁY±Æ¥u¬O¬üÆ[¦Ó¤w ¨Ã¨S¦³¹ê»Ú§@¥Î ¦Ó¥B«Ü®e©ö³y¦¨µ{§Ç¿ù¶Ã
­Y¦³»Ý­n§ï¼gµ{§Ç©Î¬ã¨sµ{§Ç®É
½Ð¥Î­ì¥»®i¶}ªºª¬ºAcoding»P²z¸Ñ

­Y¥¼¨Ó¦³»Ý­n¬üÆ[ ¦A¦Ò¼{ÁY±Æ
v4¬O¥Îif¼gªº
v5¬O¥Îselect case¼gªº

¥Á°ê¤é´ÁÂà¦è¤¸¤é´ÁÀË®Öv4.zip (26.04 KB)

¥Á°ê¤é´ÁÂà¦è¤¸¤é´ÁÀË®Öv5.zip (24.93 KB)

TOP

        ÀR«ä¦Û¦b : §Ú­Ì³Ì¤jªº¼Ä¤H¤£¬O§O¤H¡D¥i¯à¬O¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD