Notifications
Clear all

Mostrar asterisco no lugar da senha

7 Posts
3 Usuários
0 Reactions
2,978 Visualizações
victorsam
(@victorsam)
Posts: 110
Estimable Member
Topic starter
 

Pessoal do Help

Pesquisando aqui não encontrei o que eu queria exatamente, então resolvi postar.

encontrei um código na net

 senha = "1234"
  If Application.InputBox("Digite a senha autorizada", "SENHA", "") = senha Then

http://forum.baboo.com.br/index.php?/to ... ha-em-vba/

Mas no meu caso no meu caso seria com Textbox bem estou usando um código simples de login.

If TextBox1 = "JOÃO" And TextBox2 = "senha" Then

 CÓDIGO AQUI

End If

O que estou querendo é unir os dois códigos, é possível?

Tentar não é saber, é ter a certeza que vai descobrir

Dicas excel, vba, Access http://vbaedit.blogspot.com.br/

 
Postado : 09/09/2014 6:25 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Como assim?

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 10/09/2014 5:11 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

O titulo está um pouco confuso, mas veja se é isto o que quer:

Private Sub CommandButton1_Click()
    Dim sSenha
    Dim sUsuario

    sSenha = "1234"
    sUsuario = "JOÃO"
    
    If TextBox1 = sUsuario And TextBox2 = sSenha Then
        MsgBox "OK"
        'Continua a Rotina
    
    Else
        
        MsgBox "Usuário não cadastrado ou Senha Incorreta"
    
    End If

End Sub

Se pesquisar no Forum por "login" encontrara varios tópicos.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 10/09/2014 5:55 am
victorsam
(@victorsam)
Posts: 110
Estimable Member
Topic starter
 

Desculpas, Esqueci de citar converter só a senha entende

Por exemplo:
usuario: joão - senha: 1234 no caso tem que aparecer (****) na TextBox2

Tentar não é saber, é ter a certeza que vai descobrir

Dicas excel, vba, Access http://vbaedit.blogspot.com.br/

 
Postado : 10/09/2014 6:58 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Desculpas, Esqueci de citar converter só a senha entende

Por exemplo:
usuario: joão - senha: 1234 no caso tem que aparecer (****) na TextBox2

Acho que não esqueceu de mencionar pois o assunto do tópico e as suas postagens estão bem confusas e não condizem com o Titulo.

Mas se que somente que no Textbox do formulário apareçam caracteres quando da digitação, altere somente a Propriedade PasswordChar do textbox, em vez de deixar em branco coloque o caracter que quer que apareça.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 10/09/2014 8:26 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Victor

Procure ser mais objetivo no título e no detalhamento da dúvida.

Editei o título, pois daquela forma iria dificultar a pesquisa no fórum de quem tivesse uma dúvida parecida com a tua.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 10/09/2014 11:28 am
victorsam
(@victorsam)
Posts: 110
Estimable Member
Topic starter
 

Desculpa pessoal... realmente tava embaraçado mesmo

Tentar não é saber, é ter a certeza que vai descobrir

Dicas excel, vba, Access http://vbaedit.blogspot.com.br/

 
Postado : 10/09/2014 7:08 pm