Come inserire i caratteri casuali In una casella di testo in VB6

April 17

Come inserire i caratteri casuali In una casella di testo in VB6


Inserimento di caratteri casuali 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 variabili di tipo di dati "Stringa" e "Per ... Loop" per creare una stringa casuale di caratteri. Questo è utile quando si desidera aggiungere nuovi utenti per l'applicazione e si desidera farli iniziare a creare una buona password per il login.

istruzione

1 Avviare Microsoft Visual Basic 6.0, fare clic su "EXE standard" nella finestra di dialogo "Nuovo progetto" 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" utilizzando la stessa tecnica.

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

Dim rgch As String

rgch = "abcdefghijklmnopqrstuvwxyz"

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

Dim i As Long

Per i = 1 Per cb

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

Il prossimo

Text1.Text = RandomString

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