Πώς να Τοποθετήστε Τυχαία χαρακτήρες σε ένα Textbox σε VB6

Εισαγωγή τυχαίων χαρακτήρων σε ένα " πλαίσιο κειμένου " έλεγχο σε VB6 μπορεί να βοηθήσει τους χρήστες με το να μην απαιτεί να σκεφτούμε κάτι μοναδικό να εισέλθουν σε ένα πλαίσιο κειμένου . Στην VB6 , μπορείτε να χρησιμοποιήσετε μερικά " String " μεταβλητές τύπου δεδομένων και « Για ... Loop " για να δημιουργήσετε μια τυχαία σειρά χαρακτήρων . Αυτό είναι χρήσιμο όταν θέλετε να προσθέσετε νέους χρήστες στην αίτησή σας και θέλετε να τους πάρει άρχισε στη δημιουργία ενός καλού κωδικού πρόσβασης για να συνδεθείτε , τι χρειάζεστε για Microsoft Visual Basic 6.0
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Ξεκινήστε το Microsoft Basic 6.0 , κάντε κλικ στην επιλογή "Standard EXE " στο " New Project" παράθυρο διαλόγου Visual να δημιουργήσετε ένα νέο έργο . Κάντε κλικ στο " πλαίσιο κειμένου " ελέγχου και κάντε κλικ στο κουμπί της φόρμας σας να προσθέσετε ένα νέο " πλαίσιο κειμένου " ελέγχου στη φόρμα . Προσθέστε ένα "Command Button " , χρησιμοποιώντας την ίδια τεχνική . 2

Κάντε διπλό κλικ στο κουμπί εντολής για να δημιουργήσετε ένα νέο συμβάν click για αυτό το κουμπί . Προσθέστε τον ακόλουθο κώδικα για να δημιουργήσει μια τυχαία σειρά :

Dim rgch Όπως String

rgch = " abcdefghijklmnopqrstuvwxyz "

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

Dim i Όπως Long

Για i = 1 Για να cb

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

Επόμενο

Text1.Text = RandomString
εικόνων 3

Πατήστε το " F5 " για να εκτελέσετε το πρόγραμμα και κάντε κλικ στο κουμπί εντολής για να παράγουν τυχαίους χαρακτήρες στο πλαίσιο κειμένου .
Η
εικόνων