¿Cómo puedo crear una instancia de un OCX en tiempo de ejecución en el código de Visual Basic 6?

Question

¿Cómo puedo crear una instancia de un OCX en tiempo de ejecución en el código de Visual Basic 6?

nueva palabra clave no parece funcionar ...

  

Uso no válido de palabra clave New

Set bob = new bobocxlib.bobcontrol

Answer 1

Se agrega a la colección Controls de su contenedor, por ejemplo, la adición de un control de cuadro de texto intrínseco a una forma VB sobre carga:

Private Sub Form_Load()
  Dim txt As TextBox
  Set txt = Me.Controls.Add("VB.TextBox", "MyTextBox")
  With txt
    .Move 120, 120, 2000, 285
    .Visible = True
  End With
End Sub

El nombre del control es la concatenación de nombre de la biblioteca como se muestra en la Lista de objetos (VB) y el nombre de la clase (TextBox).