µù¥U
µn¿ý
º¶
½×¾Âª©³W
¸T¤î¦Cªí
»¡©ú
¦a¹Ï
¼Æ¦ì®Ñ»
¨p¤H®ø®§ (0)
¤½¦@®ø®§ (0)
½×¾Â¥ô°È (0)
¨t²Î®ø®§ (0)
¦n¤Í®ø®§ (0)
©«¤l®ø®§ (0)
³Â»¶®a±Ú°Q½×ª©ª©
»
VB »P VB.Net
» VBµ{¦¡½X¼gªk²¤Æ - «ü©w½d³ò¿é¤J
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
µo©«
[µo°Ý]
VBµ{¦¡½X¼gªk²¤Æ - «ü©w½d³ò¿é¤J
liebe
µoµu®ø®§
¥[¬°¦n¤Í
liebe
·í«eÂ÷½u
UID
28946
©«¤l
28
¥DÃD
20
ºëµØ
0
¿n¤À
70
ª÷¿ú
70
ÂI¦W
0
§@·~¨t²Î
windows
³nÅ骩¥»
Office2010
¾\ŪÅv
20
©Ê§O
¤k
¦b½u®É¶¡
29 ¤p®É
µù¥U®É¶¡
2017-7-4
³Ì«áµn¿ý
2018-8-13
¤¤¾Ç¥Í
©«¤l
28
¥DÃD
20
ºëµØ
0
¿n¤À
70
ÂI¦W
0
§@·~¨t²Î
windows
³nÅ骩¥»
Office2010
¾\ŪÅv
20
©Ê§O
¤k
µù¥U®É¶¡
2017-7-4
³Ì«áµn¿ý
2018-8-13
1
#
¸õÂà¨ì
»
˧Ǭݩ«
¥´¦L
¦rÅé¤j¤p:
t
T
µoªí©ó 2017-8-4 15:04
|
¥u¬Ý¸Ó§@ªÌ
[µo°Ý]
VBµ{¦¡½X¼gªk²¤Æ - «ü©w½d³ò¿é¤J
¦U¦ì¤j¤j̦n!
¥Ø«e¥¿¥HVB userform ¨Ó¿é¤J«ü©w½d³òªº¼ÆÈ¡A·Q½Ð±Ð¤j¤jÌ¥H¤Uµ{¦¡½X¬O§_¯à¥[¥H²¤Æ©O?
¹ïVBÁÙ¤£¬O«Ü¼ô¡AÁٽФj¤j̱бЧÚ!
·PÁ¤j®a!
µ{¦¡½X:
Private Sub CommandButton2_Click()
Range("B11").Value = Val(TextBox1)
Range("C11").Value = Val(TextBox7)
Range("D11").Value = Val(TextBox13)
Range("E11").Value = Val(TextBox19)
Range("B12").Value = Val(TextBox2)
Range("C12").Value = Val(TextBox8)
Range("D12").Value = Val(TextBox14)
Range("E12").Value = Val(TextBox20)
Range("B13").Value = Val(TextBox3)
Range("C13").Value = Val(TextBox9)
Range("D13").Value = Val(TextBox15)
Range("E13").Value = Val(TextBox21)
Range("B14").Value = Val(TextBox25)
Range("C14").Value = Val(TextBox26)
Range("D14").Value = Val(TextBox27)
Range("E14").Value = Val(TextBox28)
Range("B15").Value = Val(TextBox4)
Range("C15").Value = Val(TextBox10)
Range("D15").Value = Val(TextBox16)
Range("E15").Value = Val(TextBox22)
Range("B16").Value = Val(TextBox5)
Range("C16").Value = Val(TextBox11)
Range("D16").Value = Val(TextBox17)
Range("E16").Value = Val(TextBox23)
Range("B17").Value = Val(TextBox6)
Range("C17").Value = Val(TextBox12)
Range("D17").Value = Val(TextBox18)
Range("E17").Value = Val(TextBox24)
Unload Me
End Sub
¼Ó¥D¼ö©«
VBA´¡¤J«ü©wROW (EXCEL)
VB¿é¥XPDF¨C¦¸¥i¦Ûq·sÀɦW»P·s¸ô®|
TextBox¦p¦ó¨î¿é¤J½d³ò(µ{¦¡½X§ó§ï)
µ{¦¡½X¥ÎFor°j°é²¤Æ
EXCELªí®æ¤º¼Æ¦C©T©w¤£ÀH¼W¥[¦C§R°£¦C§ïÅÜ
VBA«ü©w®æ¤º´¡¤J¹ïÀ³ªº¹Ï¤ù(µ{¦¡½X°Q½×)
EXCEL 2010ª© ÀÉ®×·l·´³y¦¨¹Ï¤ù¿ò¥¢
CheckBoxÁôÂûP¥X²{³]©w
Form -Button§Ö±¶Á伶¼g
µ{¦¡½X²¤Æ(VB°õ¦æ®É¶¡¹L¤[)
¦¬ÂÃ
¤À¨É
Hsieh
µoµu®ø®§
¥[¬°¦n¤Í
Hsieh
·í«eÂ÷½u
UID
3
©«¤l
4901
¥DÃD
44
ºëµØ
24
¿n¤À
4916
ª÷¿ú
4916
ÂI¦W
247
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 20xx
¾\ŪÅv
150
©Ê§O
¨k
¨Ó¦Û
¥x¥_
¦b½u®É¶¡
4099 ¤p®É
µù¥U®É¶¡
2010-4-30
³Ì«áµn¿ý
2024-11-13
¶W¯Åª©¥D
©«¤l
4901
¥DÃD
44
ºëµØ
24
¿n¤À
4916
ÂI¦W
247
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 20xx
¾\ŪÅv
150
©Ê§O
¨k
¨Ó¦Û
¥x¥_
µù¥U®É¶¡
2010-4-30
³Ì«áµn¿ý
2024-11-13
2
#
µoªí©ó 2017-8-7 16:20
|
¥u¬Ý¸Ó§@ªÌ
Private Sub CommandButton2_Click()
ay = Array(1, 7, 13, 19, 2, 8, 14, 20, 3, 9, 15, 21, 25, 26, 27, 28, 4, 10, 16, 22, 5, 11, 17, 23, 6, 12, 18, 24)
For i = 0 To UBound(ay)
r = Int(i / 4): c = i Mod 4
[B11].Offset(r, c) = Controls("TextBox" & ay(i)).Value
Next
Unload Me
End Sub
½Æ»s¥N½X
¦^´_
1#
liebe
¾Ç®üµL²P_¤£®¢¤U°Ý
TOP
liebe
µoµu®ø®§
¥[¬°¦n¤Í
liebe
·í«eÂ÷½u
UID
28946
©«¤l
28
¥DÃD
20
ºëµØ
0
¿n¤À
70
ª÷¿ú
70
ÂI¦W
0
§@·~¨t²Î
windows
³nÅ骩¥»
Office2010
¾\ŪÅv
20
©Ê§O
¤k
¦b½u®É¶¡
29 ¤p®É
µù¥U®É¶¡
2017-7-4
³Ì«áµn¿ý
2018-8-13
¤¤¾Ç¥Í
©«¤l
28
¥DÃD
20
ºëµØ
0
¿n¤À
70
ÂI¦W
0
§@·~¨t²Î
windows
³nÅ骩¥»
Office2010
¾\ŪÅv
20
©Ê§O
¤k
µù¥U®É¶¡
2017-7-4
³Ì«áµn¿ý
2018-8-13
3
#
µoªí©ó 2017-8-10 14:37
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
2#
Hsieh
Hsieh¶W¯Åª©¥D¤j¤j¯u±o«Ü·PÁ§A!
¦ý¹ï©ó¥H¤U³o¤T¦æ§Ú¤£¬O«Ü¤F¸Ñ
©êºp¦]¬°¬O·s¤â·Q¦h¾Ç¤@ÂI¡A©Ò¥H°ÝÃD¤ñ¸û¦h
¤£ª¾¹D¯à§_µy·L©M§Ú¸ÑÄÀ¤@¤U
·PÁÂ!
For i = 0 To UBound(ay)
r = Int(i / 4): c = i Mod 4
[B11].Offset(r, c) = Controls("TextBox" & ay(i)).Value
TOP
Hsieh
µoµu®ø®§
¥[¬°¦n¤Í
Hsieh
·í«eÂ÷½u
UID
3
©«¤l
4901
¥DÃD
44
ºëµØ
24
¿n¤À
4916
ª÷¿ú
4916
ÂI¦W
247
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 20xx
¾\ŪÅv
150
©Ê§O
¨k
¨Ó¦Û
¥x¥_
¦b½u®É¶¡
4099 ¤p®É
µù¥U®É¶¡
2010-4-30
³Ì«áµn¿ý
2024-11-13
¶W¯Åª©¥D
©«¤l
4901
¥DÃD
44
ºëµØ
24
¿n¤À
4916
ÂI¦W
247
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Office 20xx
¾\ŪÅv
150
©Ê§O
¨k
¨Ó¦Û
¥x¥_
µù¥U®É¶¡
2010-4-30
³Ì«áµn¿ý
2024-11-13
4
#
µoªí©ó 2017-8-10 20:29
|
¥u¬Ý¸Ó§@ªÌ
ay ¬O«ö¶¶§ÇÀx¦sButton§Ç¸¹ªº°}¦C¡A©Ò¥H¥Î°j°é¶]§¹´N¯àŪ¨ú©Ò¦³Button¤º®e
¨ä¤¤r»PcÅܼƬOpºâ¥HB11¬°ìÂI¡A¦ì²¾´X¦C¡A´XÄ檺pºâ¡A§¹¦¨©p§Æ±æªº±Æ¦C¤è¦¡
¾Ç®üµL²P_¤£®¢¤U°Ý
TOP
ÀR«ä¦Û¦b :
¦³¦h¤Ö¤O¶q´N°µ¦h¤Ö¨Æ¡A¤£n¤ß¦sµ¥«Ý¡Aµ¥«Ý¤~·|¸¨ªÅ¡C
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
EXCEL±MÄÝ°Q½×°Ï
Excel£¸¯ë°Ï
Excelµ{¦¡°Ï
¶i¶¥À³¥Î±M°Ï
OFFICE ¨t¦C
Word
PowerPoint
Access
Office¤£¤À°Ï
µ{¦¡»y¨¥
VB »P VB.Net
C »P C#
Java »P J#
µ{¦¡³]p¤£¤À°Ï
¸ê®Æ®w
ORACLE
My SQL
MS SQL
ºô¶³]p
ASP »P ASP.NET
PHP
PHP+MySQL ¤Jªù¹ê§@
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
ºô¶³]p¤£¤À°Ï
¹q¸£»P§@·~¨t²Î
¹q¸£¦UºØµwÅé°Q½×
¤@¯ë¹q¸£³nÅé°Q½×
½×¾Â¨Æ°È
ºÞ²z¤½§i
§ë¶D¤Ï¬M
·s¤â´ú¸Õ
·R ¡E ¥Í¬¡
¤½¯q§G§iÄæ
¥Í¬¡»P·P°Ê
[¦¬Âæ¹¥DÃD]
[Ãöª`¦¹¥DÃDªº·s¦^´_]
[³q¹L QQ¡BMSN ¤À¨Éµ¹ªB¤Í]
¥Ó½Ð¤Í±¡Ãì±µ
Facebook¯»µ·