如何在VB6中获得一个随机字母？

Question

我不能转换我在VB.Net中看到的那些 我想创建一个类似于“Word Factory”的东西 所以我需要生成一个随机字母。 我得到了一个随机数，使用此

Dim x, first, last 
first = 65 
last = 90 
x = Int((last - Min + 1) * Rnd + Min) 

如何从字母随机的信吗？在VB6中。谢谢。

Answer 1

您可以使用Chr()函数将整数代码点转换为一个字符，然后用Asc()返回另一个方向。

这意味着你可以用代码的随机字母，如：

Dim mych As String 
mych = Chr(Asc("A") + 26 * Rnd) 

Answer 2

你可以使用类似的技术来随机数，但有随机数作为字符数组的索引？

在不相干的笔记上，您可能要注意随机字母的分布，加权一些更常见的字母，以便更频繁地出现。