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

[µo°Ý] ½Ð°Ý°ÊºA¼W¥[¨Æ¥ó

[µo°Ý] ½Ð°Ý°ÊºA¼W¥[¨Æ¥ó

¦U¦ì«e½ú§Ú¥Î¥H¤UªºCode°ÊºA²£¥Í
Private Sub CommandButton4_Click()
For  X1=1 To 3
Set theTextBox = frame1.Controls.Add("Forms.TextBox.1", "TextBox" & TeCount + X1, True)
   With theTextBox
     .Name ="TextBox" & TeCount
         .Left = 162
     .Left = 330
     .Width = 30
   End With
Next X1
End sub
ÁÙ·Q°w¹ï·s¼WªºTextBox©I¥s¨ä¥LªºFunction,½Ð°Ý³o¸Ó«ç»ò¼g?
ÁÂÁÂ

¦^´_ 1# modelcrazyer

§A¥i¥H¥ý¸ÕµÛ°Ñ¦Ò³o½g¬Ý¬Ý,­Y¦³°ÝÃD¦A´£¥X¨Ó°Q½×:

[¤À¨É] ª«¥óÃþ§OÀ³¥Îªº¼Ò«¬

TOP

ÁÂÁÂ!!·Q¥ÎVBcomponets¨Ó¼g¡A¦ý¬O¤@ª½¥X²{"¨Ï¥ÎªÌ¦Û­q«¬ºA©|¥¼©w¸q",³o¬O«ç»ò¦^¨Æ?

TOP

        ÀR«ä¦Û¦b : ¡i¦æµ½­n¤Î®É¡j¦æµ½­n¤Î®É¡A¥\¼w­n«ùÄò¡C¦p¿N¶}¤ô¤@¯ë¡A¥¼¿N¶}¤§«e¤d¸U¤£­n°±º¶¤õ­Ô¡A§_«h­«¨Ó´N¤Ó¶O¨Æ¤F¡C
ªð¦^¦Cªí ¤W¤@¥DÃD