VB隨機(jī)生成字符串
例如,,我要生成一個(gè)16位的字符串,。要求混合數(shù)字,,大寫字母,,小寫字母,。完全隨機(jī),。存入變量a就行,,不用顯示到標(biāo)簽里,。
以下簡單的程序可實(shí)現(xiàn)(每次按command1生成一組)
Private Sub Command1_Click()Randomize '初始化隨機(jī)函數(shù)發(fā)生器,,沒有它,,每次生成隨機(jī)數(shù)相同 For i = 1 To 16 x = Int(Rnd() * 3) If x = 0 Then a = a + Chr(Int(Rnd * 10) + 48) '數(shù)字 ASCII為48到58 Else If x = 1 Thena = a + Chr(Int(Rnd * 26) + 65) '大寫 Else a = a + Chr(Int(Rnd * 26) + 97) '小寫 End If End If NextPrint aEnd Sub
測試結(jié)果
相關(guān)推薦
便查問答是一款實(shí)用的網(wǎng)絡(luò)熱門知識問答平臺,,專注于分享你不知道的知識,、經(jīng)驗(yàn)及生活問題,在這里所有人都能找到答案歡迎網(wǎng)友參與討論,。