Infoga slumpmässiga tecken i ett " TextBox " kontrollen i VB6 kan hjälpa användare genom att inte kräva dem att tänka på något unikt att komma in i en textruta . I VB6 , kan du använda några "sträng" variabler datatyp och ett " För ... Loop " för att skapa en slumpmässig teckensträng . Detta är användbart när du vill lägga till nya användare till din ansökan och du vill få igång dem på att skapa ett bra lösenord för att logga in vad du behöver
Microsoft Visual Basic 6.0
Visa fler instruktioner
1
Starta Microsoft Visual Basic 6.0 , klicka på " Standard EXE " i " nytt projekt " dialogruta för att skapa ett nytt projekt . Klicka på " TextBox " kontroll och klicka på formuläret för att lägga till en ny " TextBox " kontrollen i formuläret . Lägg en " Command Button " med samma teknik .
2
Dubbelklicka kommandoknappen för att skapa en ny click-händelse för denna knapp . Lägg till följande kod för att generera en slumpmässig sträng :
Dim RGCH As String
RGCH = " abcdefghijklmnopqrstuvwxyz "
RGCH = RGCH & UCase ( RGCH ) & " 0123456789 "
Dim I As Long
För i = 1 till cb
RandomString = RandomString & Mid $ ( RGCH , Int ( Rnd ( ) * Len ( RGCH ) + 1 ) , 1 ) katalog
Nästa
Text1.Text = RandomString
3
Tryck " F5 " för att köra programmet och klicka på kommandot för att generera slumpmässiga tecken i textrutan .
