none
Gerador de Palavras Combinadas VB2015 ou 2008/2017 RRS feed

  • Pergunta

  • Fala ai Pessoal , estou com uma duvida

    Quero Criar duas TextBox

    TEXTBOX1 VAI SER O USUARIO

    TEXTBOX2 VAI SER A SENHA

    -----------------

    Então eu Vou Listar Pra fazer um random , com todos os usarios e as senhas

    ex:

    button_click
    Dim Usuario(5) As String
    Dim Random as Integer
    Usuario(1) = "UsuarioCyclano"
    Usuario(2) = "UsuarioFulano"
    Usuario(3) = "Usuario1"
    Usuario(4) = "UsuarioSeila"
    Usuario(5) = "UsuarioTal"
    Random = Int((Usuario.Count*Rnd()))
    textbox1.text = random
    
    --------------
    

    So Que , Eu Queria que cada usuario tivesse a sua senha ex

    A Senha do UsuarioCyclano Seria 123

    e assim que quando ele clicasse no botão , a textbox2 daria a senha do usuario da textbox1 , e possivel?


    segunda-feira, 11 de dezembro de 2017 00:44

Respostas

  • Olá!

    Você deverá trabalhar com uma estrutura de chave/valor.. Um exemplo desse tipo de estrutura no .NET são Dictionaries.. Veja como ficaria o código:

            Dim Usuarios As New Dictionary(Of String, String)
    
            Usuarios.Add("UsuarioCyclano", "Senha1")
            Usuarios.Add("UsuarioFulano", "Senha2")
            Usuarios.Add("Usuario1", "Senha3")
            Usuarios.Add("UsuarioSeila", "Senha4")
            Usuarios.Add("UsuarioTal", "Senha5")
    
            Dim Random As Integer
            Random = Int((Usuarios.Count * Rnd()))
            Dim Usuario = Usuarios.ElementAt(Random)
            TextBox1.Text = Usuario.Key
            TextBox2.Text = Usuario.Value
    

    Abraço!


    André Alves de Lima
    Microsoft MVP - Client App Dev
    Visite o meu site: http://www.andrealveslima.com.br
    Me siga no Twitter: @andrealveslima

    segunda-feira, 11 de dezembro de 2017 07:58
    Moderador

Todas as Respostas