Come inserire caratteri casuali in una casella di testo in VB6

Inserimento di caratteri a caso in un controllo " TextBox " in VB6 può aiutare gli utenti a non richiedendo loro di pensare a qualcosa di unico per entrare in una casella di testo . In VB6 , è possibile utilizzare un paio di "Stringa" variabili di tipi di dati e di un " ciclo FOR ... " per creare una stringa casuale di caratteri . Questo è utile quando si desidera aggiungere nuovi utenti alla propria applicazione e si vuole farli iniziare a creare una buona password per entrare quello che vi serve
Microsoft Visual Basic 6.0
Mostra più istruzioni
1

Avviare Microsoft Visual Basic 6.0 , fare clic su " EXE standard " nella finestra "Nuovo progetto" finestra di dialogo per creare un nuovo progetto . Fare clic sul controllo " TextBox " e fare clic sul form per aggiungere un nuovo controllo " TextBox " per la forma . Aggiungere un " Pulsante di comando " con la stessa tecnica .

2 Fare doppio clic sul pulsante di comando per creare un nuovo evento click di questo pulsante . Aggiungere il seguente codice per generare una stringa casuale :

Dim rgch As String

rgch = " abcdefghijklmnopqrstuvwxyz "

rgch = rgch & UCase ( rgch ) & " 0123456789 "

Dim i As Long

For i = 1 To cb

RandomString = RandomString & Mid $ ( rgch , Int ( Rnd ( ) * Len ( rgch ) + 1 ) , 1 ) per

Text1.Text = RandomString
3

Premere " F5 " per eseguire il programma e fare clic sul pulsante di comando per generare caratteri casuali nella casella di testo .