Notifications
Clear all

Click em imagem

3 Posts
2 Usuários
0 Reactions
1,012 Visualizações
(@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/

 
Postado : 27/03/2015 7:03 am
(@paulitotavares)
Posts: 36
Eminent Member
Topic starter
 

Obrigado

Pelo que vejo um código simples, mas que me fez perder algum tempo.

Abraço

 
Postado : 27/03/2015 9:01 am