CRIAR CONTROLE EM TEMPO DE EXECUCAO

ROMULO.SILVA 05/06/2007 12:50:02
#219820
Bom dia!
Já fiz algumas pesquisas no VBMania e em outros Sites de VB e não encontrei o que preciso, talvez os mestres do VBMania possam me ajudar.

Meu problema é o seguinte, tenho um CommandButton que eu personalizei e preciso criar uma série de Botões em tempo de execução, porém sei que para criar controles que não são do próprio VB é um pouco diferente mas não consegui descombrir qual a maneira correta.

Será que alguém pode me ajudar ?
RICATOM 05/06/2007 13:28:11
#219829
Colega

Crie um CommandButton com index=0

Para criar em tempo de execução

Private Sub Command2_Click()
    With Command1
        Load Command1(.UBound + 1)  'Cria e Carrega + 1 CommandButton
        Command1(.UBound).Caption = "Teste"
        Command1(.UBound).Visible = True  'Mostra
        Command1(.UBound).Move Command1(.UBound).Left, Command1(.UBound).Top + Command1(.UBound).Height
    End With

End Sub


Para excluir

Unload Command1(Index)  'Exclui
Tópico encerrado , respostas não são mais permitidas
Voltar