Click em imagem

2024 - VBA & Macros

Post Recente por paulitotavares 10 anos atrás

3 Posts

2 Usuários

0 Reactions

1,021 Visualizações

RSS

paulitotavares

(@paulitotavares)

Posts: 36

Eminent Member

Topic starter

Bom dia

Será que alguém me poderia ajudar com um código?

Tenho uma imagem numa formulário, com a qual queria que após o Click, escrevesse no Label1 - "SIM";
Se voltasse a clicar aparecia "Não";
Clicando novamente voltava a sim.

É possível

Cumprimentos

Postado : 27/03/2015 6:21 am

Issamu

(@issamu)

Posts: 605

Honorable Member

O código para ser incluído no módulo do seu form ficaria:

Private Sub Image1_Click()
    If Label1.Caption = "SIM" Then
        Label1.Caption = "NÃO"
    Else
        Label1.Caption = "SIM"
    End If
End Sub

Estou supondo que o nome da sua imagem é Image1.

Rafael Issamu F. Kamimura
Moderador Oficial Microsoft Community - MCC (Contribuidor do Microsoft Community)
http://zip.net/bjrt0X - http://zip.net/bhrvbR
Foi útil? Clique na mãozinha
Conheça: http://excelmaniacos.com/