我要定义一个n行两列的数组,n不确定,怎么定义呀?

解决方案 »

  1.   

    可以,在标准模块中定义:
    要创建动态数组,请按照以下步骤执行: 
    (如果希望数组为公用数组,则)用 Public 语句声明数组,或者,(如果希望数组为模块级,则)在模块级用 Dim 语句声明数组,或者(如果希望数组为局部数组,则)在过程中用 Static 或 Dim 语句声明数组。给数组附以一个空维数表,这样就将数组声明为动态数组。
    ReDim 语句用来定义或重定义原来已经用带空圆括号(没有维数下标)的 Private、Public 或 Dim 语句声明过的动态数组的大小。
    例:
    标准模块
    Option Explicit
    Public BL() As String
    窗体部分
    Option Explicit
    Dim i As Integer
    Dim j As Integer
    Private Sub Command1_Click()
    ReDim BL(5, 10) As String
    For i = 0 To 2
        For j = 0 To 5
            BL(i, j) = i ^ 2 + j ^ 2
        Next
    Next
    For i = 0 To 2
        For j = 0 To 5
           Print BL(i, j)
        Next
    Next
    End Sub 
      

  2.   


     Dim a() As String
     ReDim a(n1,n2)    '初始化数组大小
     a(1,1)="啊" 
      

  3.   

    用动态数组定义
    redim f(n,2) as single