我正在创建一个随机的文本生成器。
它运作正常,但我似乎无法解决一个小问题。
当我单击我的测试按钮时,会立即出现一个空白项目。这是我的代码。
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()))
答案 0 :(得分:1)
你声明的RAND(16)包含17个元素。最后一个是空白的,因为您没有将其初始化为任何内容。您可以使用Watch窗口验证:
关于Nothing
如何成为空白,这是幕后隐式转换的结果。