ªð¦^¦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®É¤é²öªÅ¹L¡j¤@­Ó¤H¦b¥@¶¡°µ¤F¦h¤Ö¨Æ¡A´Nµ¥©ó¹Ø©R¦³¦hªø¡C¦]¦¹¥²¶·»P®É¶¡Ävª§¡A¤Á²ö¨Ï®É¤éªÅ¹L¡C
ªð¦^¦Cªí ¤W¤@¥DÃD