- ©«¤l
- 127
- ¥DÃD
- 28
- ºëµØ
- 0
- ¿n¤À
- 160
- ÂI¦W
- 0
- §@·~¨t²Î
- W7
- ³nÅ骩¥»
- 2003
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-11-1
- ³Ì«áµn¿ý
- 2017-5-20
|
¥»©«³Ì«á¥Ñ icestormer ©ó 2012-5-6 09:33 ½s¿è
¦^´_ 9# Hsieh
è¤~ªºµ{¦¡§¹¥þ¥i¥H¨Ï¥Î¦ý§Ú¦³¤GÓ°ÝÃD ÁÙ¬O¤£À´ ·Q½Ð°Ý¶Wª©
§Ú¦pªG§âµ{¦¡§ï¦¨³o¼Ë
Private Sub UserForm_Initialize()
'·s¼W2Äæ8¦C
For j = 1 To 2
k = 0
For i = 1 To 10
k = k + 1
With Controls.Add("Forms.Label.1", , True)'¤£§ï¥¦NAME Åý¥¦¥ÑLabel1 -21
.Caption = .Name
.Top = 20 * (i - 1) + 5
.Left = 160 * (j - 1) + 5
.Width = 155
.Height = 18
ComboBox1.AddItem .Name
End With
Next
Next
End Sub
µM«á§Ú¥t¥~§Ë¤@ÓCMD ¤º®e¬O
Label1.caption ="´ú¸Õ" <<·|¥¢±Ñ§ä¤£¨ìª«¥ó
----------------------------------------------------------------------------------------------------------------------------
¦ý¦pªG§Ú¬O¥ý¨Æ¦bªí³æ¤W ¥ý©Ô¥X¤@ÓLAbel1«á
³o®É¥Ñ¤WÀYµ{¦¡½X²£¥ÍªºLabel 1-21 >Åܦ¨>Label2-21
§Ú¦A«öCMD ªº¥¨¶° Óý¬O¥i¥H§ïÅÜLable1.caption
³o¬O¬°¤°»ò©O? µ{¦¡¥Í¦¨ªºLabel1 ¬°¦ó¨Sªk§Q¥Î Label1.caption ="´ú¸Õ" ¨Ó§ïÅÜ¥¦©O?¦ý¨Æ¥ý©Ô¦bªí³æ¤WªºLabel1.caption Óý¥i¥H?¹ê¦b¤£À´©O
-----------------------------------------------------------------------------------------------------------------------------------------------------------------
²Ä¤G°ÝÃD¬O.
¹³µ{¦¡½X¥Í¦¨ ¥X Label1 -21 ³o³¡¥÷¥i¥H§Q¥Î°j°é §â¥¦Ì¤@¦¸³£³]©w¦¨visible=false? ¬On§Q¥Îtabindex ¶Ü? ÁÙ¬On¦p¦ó¼g©O? |
|