用VB随机生成13位小写字母

ZX

小写字母对应的ascii值是 97~122
dim i as integer
dim outstr as string
outstr=""
for i=1 to 13
outstr=outstr + chr(int(26*rnd(1))+97)
next i
text1.text= outstr

outstr 是指输出的字符串变量。
一共生成13个字符，用+ 把他们连起来 outstr=outstr + chr

VB.Net的话这么写：
Dim outstr as string = String.Empty
Dim r as new Random
For i = 0 to 13
outstr += chr(r.Next(...))
next i
MessageBox.Show(outstr)

【...】是范围，格式是【最小值，最大值】

outstr 是楼上声明的一个变量 意思是"输出的字符" 你可以用其它的代替 , 如a,b,c ...包括中文都可以,你的目的是把字母放到文本里,我搞不清楚怎么才能将它一次产生,总会有前后的吧,计算机那速度也是一眨眼的事情,我将楼上的代码按照你的要求修改如下:

dim i as integer
dim outstr as string
outstr=""
for i=1 to 13
outstr=outstr + chr(int(26*rnd(1))+97)
next i
text1.text=outstr

全写到文本里去了