VB获取指定长度的随机字符串
2011-03-25 12:06
417 查看
'指定长度的祖母数字组合
Public Function RandomFix(N As Long) As String
Randomize
R = R + Chr(Int(Rnd() * 26) + 65) '生成一个大写字母
For I = 2 To N 'N是指定长度
Randomize
T = Int(Rnd() * 3)
Select Case T
Case 0
Randomize
R = R + Chr(Int(Rnd() * 26) + 65) '生成一个大写字母
Case 1
Randomize
'R = R + Chr(Int(Rnd() * 26) + 97) '生成一个小写字母
R = R + Chr(Int(Rnd() * 10) + 48) '生成一个数字
Case 2
Randomize
R = R + Chr(Int(Rnd() * 10) + 48) '生成一个数字
End Select
Next I
RandomFix = R
End Function
Public Function RandomFix(N As Long) As String
Randomize
R = R + Chr(Int(Rnd() * 26) + 65) '生成一个大写字母
For I = 2 To N 'N是指定长度
Randomize
T = Int(Rnd() * 3)
Select Case T
Case 0
Randomize
R = R + Chr(Int(Rnd() * 26) + 65) '生成一个大写字母
Case 1
Randomize
'R = R + Chr(Int(Rnd() * 26) + 97) '生成一个小写字母
R = R + Chr(Int(Rnd() * 10) + 48) '生成一个数字
Case 2
Randomize
R = R + Chr(Int(Rnd() * 10) + 48) '生成一个数字
End Select
Next I
RandomFix = R
End Function
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- 获取指定长度的随机字符串
- C#实现 获取指定字节长度 中英文混合字符串 的方法
- 从给定字符串结尾获取指定字节长度的字符串
- C# 生成指定长度的随机字符串
- C#实现 获取指定字节长度 中英文混合字符串 的方法
- 生成指定长度的随机字符串
- js substring从右边获取指定长度字符串(示例代码)
- 生成指定长度的随机字符串
- 问题求解，关于java随机生成指定长度的字符串
- Java精确截取字符串/获取字符串前指定长度字符函数
- PHP随机产生指定长度字符串
- 生成指定长度的随机字符串 .
- 生成指定长度随机字符串
- C#实现 获取指定字节长度 中英文混合字符串 的方法
- web前端_Math.random()生成指定长度随机字符串
- 生成指定长度的随机字符串
- 时间格式的转换 生成指定长度的随机字符串
- Java随机生成长度不少于6的指定长度的密码，且这个字符串必须包含大小写字母、数字和特殊字符，四种的任意三种
- iOS 生成随机字符串 从指定字符串随机产生n个长度的新字符串
- Java指定长度随机生成的字符串，且这个字符串必须包含大小写字母和数字