VBWEB - Simulando um botão on-off com um label e um picturebox

USUÁRIO: SENHA:

SALVAR LOGIN ?


	Dicas
	Visual Basic (Miscelâneas)

Título da Dica: Simulando um botão on-off com um label e um picturebox

Postada em 18/7/2005 por Rinaldo

Para isso você deverá inserir um picturebox no form e dentro deste picturebox um label com fundo transparente
Lógo apos insira o código abaixo:

Private Sub Form_Load()
    Label1.Caption = "Off"
End Sub

Private Sub Label1_Click()
    If Picture1.Appearance = 0 Then
        Picture1.Appearance = 1
        Label1.Caption = "Off"
    Else
        Picture1.Appearance = 0
        Label1.Caption = "On"
    End If
End Sub

Private Sub Picture1_Click()
    If Picture1.Appearance = 0 Then
        Picture1.Appearance = 1
        Label1.Caption = "Off"
    Else
        Picture1.Appearance = 0
        Label1.Caption = "ON"
    End If
End Sub


		CyberWEB Network Ltda. © Copyright 2000-2024 - Todos os direitos reservados. Powered by HostingZone - A melhor hospedagem para seu site