主题：[求助]生成的随机数全是英文字母？

生成的随机数全是英文字母？

Rand.NextString(6)

这样生成的随机数有字母有数字，是否有更简单的方法让生成的随机数全是英文字母？

谢谢chen37280600！

谢谢蓝总！

明白了！

代码如下：

Dim x As String
Dim zm As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
For i As Integer = 1 To 6
    Dim rn As Integer = Rand.Next(0, 51)
    x += zm.Chars(rn)
Next
Output.Show(x)

 打包成自定义函数

‘函数名RandLetter

Dim x As String
Dim zm As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
For i As Integer = 1 To Args(0)
    Dim rn As Integer = Rand.Next(0, 51)
    x += zm.Chars(rn)
Next
Return x

调用

Dim x As String = Functions.Execute("RandLetter", 10) ’第一个参数是字母随机数的位数
Output.Show(x)