Inserção de caracteres aleatórios em um controle " TextBox " em VB6 pode ajudar os usuários, não obrigando-os a pensar em algo único para entrar em uma caixa de texto. No VB6 , você pode usar algumas variáveis tipo de dados " corda " e um " For ... Loop" para criar uma seqüência aleatória de caracteres. Isto é útil quando você quiser adicionar novos usuários à sua aplicação e você quer que eles começaram a criar uma boa senha para entrar Coisas que você precisa
Microsoft Visual Basic 6.0
Show Mais instruções
1 6.0 , clique em " standard EXE " no " New Project" janela de diálogo do Microsoft Visual Basic
Comece a criar um novo projeto. Clique no controle " TextBox " e clique com o formulário para adicionar um novo controle " TextBox " ao formulário. Adicionar um " botão de comando ", usando a mesma técnica.
2
Clique duas vezes no botão de comando para criar um novo evento de clique para este botão. Adicione o seguinte código para gerar uma seqüência aleatória :
Dim rgch As String
rgch = " abcdefghijklmnopqrstuvwxyz "
rgch = rgch & UCase ( rgch ) e " 0123456789 "
Dim i As Long
Para i = 1 To cb
RandomString = RandomString & Mid $ ( rgch , Int ( Rnd () * Len ( rgch ) + 1) , 1)
Próxima
Text1.Text = RandomString
3
Pressione " F5" para executar o programa e clique no botão de comando para gerar caracteres aleatórios na caixa de texto .
