50分问一简单问题
怎么让随机生成20位数,这20位是字母和数字在一起的.谢谢. 问题点数:50、回复次数:7Top
1 楼coley(唉~眼镜又厚了~)回复于 2006-03-03 11:42:14 得分 5
建立一个数组,存放所有约的字符串
然后用循环,每次随机一个数字,取对应的数组数据组合成字符串就ok了Top
2 楼jecray(云和山的彼端)回复于 2006-03-03 11:46:57 得分 15
Function GenKeyOne(digits)
Dim GenKeyTwo
Dim char_array(62)'需初始化数组
Dim RandCode
randomize'生成digits位的随机字符或数字,决定于char_array数组中的内容 。
do while len(output) < digits
num = char_array(Int((62 - 0 + 1) * Rnd + 0))
output = output + num
loop
GenKeyOne = output
End Function
Top
3 楼wfz131(wfz131)回复于 2006-03-03 11:53:48 得分 0
能具体一下吗
Top
4 楼c02645(冰冷小城……)回复于 2006-03-03 12:10:06 得分 20
tring Vchar = "A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,W,X,Y,Z,0,1,2,3,4,5,6,7,8,9" ;
string[] VcArray = Vchar.Split(',') ;
string VNum="";
Random rand =new Random();
for ( int i = 1 ; i < 20 ; i++ )
{
rand =new Random(i*temp*unchecked((int)DateTime.Now.Ticks));
int t = rand.Next(35) ;
return RndNum( VcodeNum );
VNum += VcArray[t];
}
你想要的就是VNumTop
5 楼wfz131(wfz131)回复于 2006-03-03 13:35:59 得分 0
上面那个可能会重复吗Top
6 楼unique_shijian(筱逸)回复于 2006-03-04 09:25:54 得分 5
楼上的不错!Top
7 楼nameone(过客)回复于 2006-03-04 11:00:14 得分 5
UPTop




