Nwlapcug.com


Come inserire caratteri casuali in un oggetto Textbox in VB6

Come inserire caratteri casuali in un oggetto Textbox 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 alcune variabili di tipo di dati "Stringa" e un "per... Loop"per creare una stringa di caratteri casuali. Questo è utile quando si desidera aggiungere nuovi utenti all'applicazione e volete farli iniziare sulla creazione di una buona password per il login.

Istruzioni

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 modulo per aggiungere un nuovo controllo "TextBox" al form. Aggiungere un "pulsante di comando" utilizzando la stessa tecnica.

2

Fare doppio clic sul pulsante di comando per creare un nuovo evento di click per questo pulsante. Aggiungere il codice seguente 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)

Next

Text1. Text = StringaCasuale

3

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