同题
怎么实现

解决方案 »

  1.   


    '请增加一个按扭 Command1; index=0 再增加一个Picrure1
    Option ExplicitPrivate 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
      

  2.   

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

  3.   

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