以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  随机生成字母  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=78680)
--  作者：hjcslr
--  发布时间：2015/12/14 22:33:00
--  随机生成字母
Rand.NextString(12) \'生成长度为12的随机字符串
但是生成是：df372db72452，数字和字母混合的，想只要生成的字母，该如何弄？呵呵
--  作者：大红袍
--  发布时间：2015/12/14 22:44:00
--  

自己写

 

Dim str As String = ""
For i As Integer = 1 To 20
    Dim idx As Integer = rand.Next(97, 122)
    str &= chr(idx)
Next
msgbox(str)