Variavel com informação de um controlo.

[herrera]

Boas..

Alguém me poderia dizer como fazer para colocar numa variavel a informação do controlo ou o controlo em si??? Ou nao e possivel?? Sei que dá para passar como argumento

a uma funcao mas nao sei se da para atribuir a uma variavel...

Tenho um codigo que fiz e tenho feito testes mas nao funciona....

Dim controlo As CommandButton

Private Sub Command1_Click()

    MsgBox controlo.Caption

End Sub

Private Sub Form_Load()

    controlo = Form1.Command1

End Sub

isto prvoca um erro na atribuicao do command1 à variavel controlo (object variable or with blok variable not set)

Se fosse possivel uma ajudinha,

Desde ja grato pela atencao

Herrera

[freesumo]

Usa a keyword Set.

Dim controlo As CommandButton

Private Sub Command1_Click()
MsgBox controlo.Caption
End Sub

Private Sub Form_Load()
Set controlo = Form1.Command1
End Sub

Quando se dá um Run-time error aparece uma caixa a especificar o tipo e o número do erro, nessa caixa tens geralmente à tua disposição os seguintes botões <continue>, <end>, <debug> e <help>, usa o <help> e lê.

Cyas 😛

[herrera]

obrigado pela ajuda.... 😉