需要 把 TEXTBOX 动态加载到 pictureBox 容器内

[wuqing5220]

同题
怎么实现

[wuqing5220]

有人不~~开门呀

[fvflove]

'请增加一个按扭 Command1; index=0 再增加一个Picrure1
Option Explicit

Private Sub Form_Load()
  Load Command1(1)
  Set Command1(1).Container = Picture1
  Command1(1).Left = 0
  Command1(1).Height = Picture1.Height / 3
  Command1(1).Top = 0
  Command1(1).Width = Picture1.Width / 3
  Command1(1).Visible = True
End Sub

[fvflove]

如果是TextBox 同理.主要是一个这样的语句:
Set Command1(1).Container = Picture1 '设定控件的容器.

[wuqing5220]

感谢下~~~第一次写VB AX 真累