如何使用VBA生成随机字符串
2013-03-11 11:40
239 查看
在VBA中生成随机字符串的代码实现，原理还有待研究
------------------------------------
Sub RA()
Dim i As Integer, s As String, s1 As String
For i = 1 To 80
Randomize
s = Chr(IIf(10 * Rnd > 5, Int(26 * Rnd + 65), Int(26 * Rnd + 97)))
s1 = s1 & s
Next i
Cells(1, 1) = s1
End Sub
------------------------------------
Sub RA()
Dim i As Integer, s As String, s1 As String
For i = 1 To 80
Randomize
s = Chr(IIf(10 * Rnd > 5, Int(26 * Rnd + 65), Int(26 * Rnd + 97)))
s1 = s1 & s
Next i
Cells(1, 1) = s1
End Sub
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- Qt如何上传zip文件（两种形式），及随机生成规定长度的字符串的小方法
- 如何使用Visual Studio 2010在数据库中生成随机测试数据
- 如何使用Linux命令生成随机密码？
- 如何随机生成01随机字符串
- 如何随机生成01随机字符串
- 如何随机生成01随机字符串
- 如何使用Visual Studio 2010在数据库中生成随机测试数据
- 使用 Python 如何生成 10个随机激活码
- 如何随机生成01随机字符串
- 学python（03）—— 如何使用函数实现一个随机字符串里的大小写字符互换
- 如何随机生成01随机字符串
- 如何用Python语言生成随机字符串
- 如何使用Visual Studio 2010在数据库中生成随机测试数据
- 如何随机生成01随机字符串
- Java回炉重造(五)使用Apache Commons Text生成随机字符串
- 如何随机生成01随机字符串
- 如何使用rand函数&随机生成80以上的数字
- 详解Linux如何生成随机数字和字符串
- php使用str_shuffle()函数生成随机字符串的方法分析
- 使用boost库生成 随机数 随机字符串