如何在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

你可以使用類似的技術來隨機數，但有隨機數作爲字符數組的索引？

在不相干的筆記上，您可能要注意隨機字母的分佈，加權一些更常見的字母，以便更頻繁地出現。