vb中如何随机产生任意字母?

问题描述:

vb中如何随机产生任意字母?
随机产生大写字母可以用a(i)=Chr(Asc("A")+Int(Rnd*26))

改用通用的获取随机字符的方式.
定义一个字符串
strAph="abcd.ABCD..."
取随机一个字符
a=mid(strAph,int(rnd(52))+1)