如何在VB6中获取随机字母？
How to get a random letter in VB6?
我无法转换我在 VB.Net 中看到的那些
我想创建类似 "Word Factory" 的东西
所以我需要随机生成一封信。
我设法用这个
得到了一个随机数
Dim x, first, last
first = 65
last = 90
x = Int((last - Min + 1) * Rnd + Min)
字母表中的随机字母怎么样？在 VB6 中。谢谢
能否使用与随机数类似的技术，但将随机数作为字符数组的索引？
关于不相关的说明，您可能需要注意随机字母的分布，对一些更常见的字母进行加权，使它们出现得更频繁。
您可以使用 Chr() 函数将整数代码点转换为字符，然后使用 Asc() 返回另一个方向。
这意味着您可以获得一个随机字母，代码如下：
Dim mych As String
mych = Chr(Asc("A") + 26 * Rnd)
我无法转换我在 VB.Net 中看到的那些 我想创建类似 "Word Factory" 的东西 所以我需要随机生成一封信。 我设法用这个
得到了一个随机数Dim x, first, last
first = 65
last = 90
x = Int((last - Min + 1) * Rnd + Min)
字母表中的随机字母怎么样？在 VB6 中。谢谢
能否使用与随机数类似的技术，但将随机数作为字符数组的索引？
关于不相关的说明，您可能需要注意随机字母的分布，对一些更常见的字母进行加权，使它们出现得更频繁。
您可以使用 Chr() 函数将整数代码点转换为字符，然后使用 Asc() 返回另一个方向。
这意味着您可以获得一个随机字母，代码如下：
Dim mych As String
mych = Chr(Asc("A") + 26 * Rnd)