COMPONENTE VB

IRENKO 21/08/2009 16:23:33
#320607
Para que possa criar um ComboBox dinamicamente em VB sei q é assim:

Controls.Add([Ô]VB.ComboBox[Ô])

Agora, quando eu adiciono em componentes a biblioteca (Microsoft Forms 2.0 Object Library), como eu faço a chamada em VB?

Em VBA é assim:

Form.Controls.Add([Ô]Forms.ComboBox.1[Ô])

e não funciona em VB!
ASHKATCHUP 21/08/2009 16:38:57
#320609 Resposta escolhida
é assim:


Form1.Controls.add (<NOME DENTRO DA OCX>,<NOME DO COMPONENTE>)


Para pegar o nome do componente dentro da OCX:

Crie um form e coloque seu componente dentro. Após, salve o form. Com o bloco de notas, abra o seu form.
Então, procure pelo bloco que cria ele e copie o nome do componente. Exemplo:


  Begin VB.PictureBox Picture1 
      Height          =   495
      Left            =   1800
      ScaleHeight     =   435
      ScaleWidth      =   1155
      TabIndex        =   0
      Top             =   1320
      Width           =   1215
   End


Nome do componente:


VB.PictureBox


Então


Private Sub Form_Load()
    Dim x As Control
    Set x = Form1.Controls.Add([Ô]VB.PictureBox[Ô], [Ô]Teste[Ô])
    x.Visible = True
End Sub
IRENKO 21/08/2009 17:06:10
#320614
Cara é isso ai, eu não sabia dessa solução, inclusive me tirou uma pulga atras da orelha. Sempre que eu pesquisava algo na net em vb, aparecia esse código maluco q eu nunca tinha visto inciando com begin ai ficava a duvida, é VB ou delfhi? Tá esclarecido. Não ria, sou iniciante.

Valeu!
ASHKATCHUP 21/08/2009 17:10:26
#320616
Citação:

IRENKO escreveu:
Cara é isso ai, eu não sabia dessa solução, inclusive me tirou uma pulga atras da orelha. Sempre que eu pesquisava algo na net em vb, aparecia esse código maluco q eu nunca tinha visto inciando com begin ai ficava a duvida, é VB ou delfhi? Tá esclarecido. Não ria, sou iniciante.

Valeu!



Não se preocupe, eu não estou rindo. Também sou novato em VB. E entendo a sua dúvida. Tudo em delphi usa [Ô]BEGIN/END[Ô].

Qualquer dúvida, dá um grito.
Tópico encerrado , respostas não são mais permitidas
Voltar