自己写
Dim str As String = ""For i As Integer = 1 To 20 Dim idx As Integer = rand.Next(97, 122) str &= chr(idx)Nextmsgbox(str)
加好友 
发短信
Post By：2015/12/14 22:44:00 [显示全部帖子]
