Vb.net VB:全局数组';预计申报';
我想制作一个全局数组,所有按钮都可以访问它。但我不知道怎么做Vb.net VB:全局数组';预计申报';,vb.net,Vb.net,我想制作一个全局数组,所有按钮都可以访问它。但我不知道怎么做 Module GlobalConstants Public strCDRack(0 To 2, 0 To 1) As String strCDRack(0, 0) = "Deftones" strCDRack(0, 1) = "Tool" strCDRack(0, 2) = "Disturbed" strCDRack(0, 0) = "Sticky Finger
Module GlobalConstants
Public strCDRack(0 To 2, 0 To 1) As String
strCDRack(0, 0) = "Deftones"
strCDRack(0, 1) = "Tool"
strCDRack(0, 2) = "Disturbed"
strCDRack(0, 0) = "Sticky Fingers"
strCDRack(0, 1) = "Beggars Banquet"
strCDRack(0, 2) = "Let It Bleed"
End Module
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
TextBox1.Text = strCDRack(0, 1)
End Sub
End Class
你还弄乱了文本的标记。您声明了数组(0到2,0到1)
,但在第一个维度中仅使用了(0),而在第二个维度中超出了边界(0,1,2)
请参见您需要在代码块中初始化该内容,并且您可以在表单而不是模块中声明该内容,以便所有按钮都可以访问它。单击该按钮不会使textbox1显示任何内容??很抱歉,这是一个新问题。如果
TextBox1
位于表单1上,并且它是您唯一的表单;或者是启动形式,它应该可以工作。但是你也弄乱了数据存储的位置-参见编辑。
Public Class Form1
Friend strCDRack(0 To 2, 0 To 1) As String ' just declaring
' the error message `declaration expected` is telling you all that
' can be done at this level is to declare variables
Sub Form Load...
' code to initialize the array or DO anything
' must be in a procedure
strCDRack(0, 0) = "Deftones"
strCDRack(1, 0) = "Tool"
strCDRack(2, 0) = "Disturbed"
strCDRack(0, 1) = "Sticky Fingers"
strCDRack(1, 1) = "Beggars Banquet"
strCDRack(2, 1) = "Let It Bleed"