2014-01-10 133 views
1

我正在创建一个随机的文本生成器。简单的随机生成器生成空白项目

它工作正常,但我似乎无法解决的一个小问题正在发生。

当我点击我的测试按钮时,每时每刻都会出现一个空白项目。这是我的代码。

Dim rng As New System.Random() 
    Dim RAND(16) As String 
    RAND(0) = "A" 
    RAND(1) = "B" 
    RAND(2) = "C" 
    RAND(3) = "D" 
    RAND(4) = "E" 
    RAND(5) = "F" 
    RAND(6) = "G" 
    RAND(7) = "H" 
    RAND(8) = "I" 
    RAND(9) = "J" 
    RAND(10) = "K" 
    RAND(11) = "L" 
    RAND(12) = "M" 
    RAND(13) = "N" 
    RAND(14) = "O" 
    RAND(15) = "P" 
    TextBox1.Text = RAND(rng.Next(RAND.Count())) 

回答

1

您声明的RAND(16)包含17个元素。最后一个是空白的,因为你没有初始化任何东西。您可以使用监视窗口,验证:

enter image description here

关于如何Nothing变成一片空白,这是幕后的隐式转换的结果。

+1

上帝保佑另一双眼睛。谢谢Neolisk。感谢帮助。 – CJSoldier