vb中如何产生二维数组

1、打开前面板，在控制板中选择数组矩阵库中的数组放到前面板上。2、打开后面板，找到对应的数组。然后右键菜单中点击属性。3、默认的数组的属性为1维的，我们将其改为2。4、再次回到前面板，在数值库中，将数值插入控件拖入二维数组中的灰色区域。5、此时前面板中，数组的形状发生了变化。6、此时点...

VB中定义二维数组的方法是这样的，如果要定义整数的二维数组的话，可以采用以下的定义：Dim A(1 TO 9,1 TO 9) AS INTEGER

Private Type MyPoint X As Integer Y As Integer End Type Private Sub Form_Click()Dim N As Integer, A() As Integer N = 5 '如果用户输入,请改成 Inputbox ReDim A(1 To N, 1 To N) As Integer Dim Max As Integer, Min As Integer Dim MaxP As MyPoint, MinP As MyPoint ...

（如果希望数组为公用数组，则）用 Public 语句声明数组，或者，（如果希望数组为模块级，则）在模块级用 Dim 语句声明数组，或者（如果希望数组为局部数组，则）在过程中用 Static 或 Dim 语句声明数组。给数组附以一个空维数表，这样就将数组声明为动态数组。ReDim 语句用来定义或重定义原来已经用带...

'二维数组10*10的integer类型dim num(10,10) as integer 'VB6.0 从1-10为10个元素 *10元素num(1,1)=5mum(1,2)=8'从1开始依此类推到10num(2,1)=6num(2,2)=4'从1开始依此类推到10'以上二维数组相当于：'10行*10例的表格如下图!

例如，用第一次声明在模块级所建立的动态数组 Matrix1：Dim Matrix1 () As Integer 然后，在过程中给数组分配空间：Sub CalcValuesNow ()...ReDim Matrix1 (19, 29)End Sub 这里的 ReDim 语句给 Matrix 分配一个 20 × 30 的整数...

dim a(10,10) as integer 就定义了一个11*11的整数数组

如果你意思是一个数字Int=123456789 让他赋值到[3,3]数组的话 Strtmp = Str(Int)k = 2 for i = 0 to 2 for j = 0 to 2 if k < Len(Strtmp) then a(i,j) = Val(Mid(Strtmp,k,1))end if k = k+ 1 next j next i 要是普通的数字赋值就直接用两个FOR不就行咯 ...

用ARRAY定义数组也可以，只是你的定义方法及引用方法都不对。用ARRAY无法定义二维数组，只能定义多重数组，因此不能向二维数组那样引用。Dim PartIn, PartOutPartIn = Array(Array(F11, F12, F13), Array(F21, F22, F23), Array(F31, F32, F33))PartOut = Array(Array(F11F, F12F, F13F), ...

dim c,str as string open app.apth & "\X.txt" for input as #1 do while not eof(1)line input#1,c str=str & c loop b=Split(str,vbcrlf) '取每一行的数据，共五行，所以一维数组b有五个元素，最大下标为4 for i=0 to ubound(b)a=split(b(i)," ")'对于每一个b的元素...