<\/span><\/h4>\n\n\n\nTiene un n\u00famero fijo de art\u00edculos. Dado que no es un objeto, declararlo crea una instancia. Al declarar, se puede especificar el n\u00famero de dimensiones y el l\u00edmite inferior y el l\u00edmite superior de cada dimensi\u00f3n, o las dimensiones y el rango de una matriz se pueden cambiar din\u00e1micamente en tiempo de ejecuci\u00f3n. Si especifica solo el n\u00famero de elementos sin especificar los l\u00edmites inferior y superior de cada dimensi\u00f3n, el l\u00edmite inferior es 0 de forma predeterminada. Si se utiliza Option Base 1, el l\u00edmite inferior predeterminado es 1.<\/p>\n\n\n\n
c\u00f3digo de ejemplo de declaraci\u00f3n<\/p>\n\n\n\n
Dim DayArray(50)\nDim Matrix(3, 4) As Integer\nDim MyMatrix(1 To 5, 4 To 9, 3 To 5) As Double<\/pre>\n\n\n\nDeclare l\u00edmites inferiores\/superiores para cada dimensi\u00f3n, verifique: use LBound, UBound<\/p>\n\n\n\n
Dim A(1 To 100, 0 To 3, -3 To 4) \nLBound(A, 1) -> 1, UBound(A, 1) -> 100 ' 1\ucc28\uc6d0 \ud558\ud55c\/\uc0c1\ud55c\nLBound(A, 2) -> 0, UBound(A, 2) -> 3 ' 2\ucc28\uc6d0 \ud558\ud55c\/\uc0c1\ud55c\nLBound(A, 3) -> -3, UBound(A, 3) -> 4 ' 3\ucc28\uc6d0 \ud558\ud55c\/\uc0c1\ud55c<\/pre>\n\n\n\n<\/p>\n\n\n\n
Cambio de tama\u00f1o de dimensi\u00f3n: cambie el tama\u00f1o de dimensi\u00f3n de una matriz din\u00e1mica con la instrucci\u00f3n Redim.<\/p>\n\n\n\n
Dim MyArray() As Integer ' \ub3d9\uc801 \ubc30\uc5f4\uc744 \uc120\uc5b8\ud569\ub2c8\ub2e4. \nRedim MyArray(5) ' 5\uac1c\uc758 \uc694\uc18c\ub97c \ud560\ub2f9\ud569\ub2c8\ub2e4. \nRedim Preserve MyArray(15) ' 15\uac1c\uc758 \uc694\uc18c\ub85c \ud06c\uae30\ub97c \ubcc0\uacbd\ud569\ub2c8\ub2e4.<\/pre>\n\n\n\nBucle de art\u00edculo (para el siguiente)<\/p>\n\n\n\n
'Split & Trim \ucc98\ub9ac\nPublic Function SplitTrim(aExpression As String, aDelimeter As String) As String()\n Dim saOut() As String, i As Integer\n saOut = Split(aExpression, aDelimeter)\n For i = LBound(saOut) To UBound(saOut)\n saOut(i) = Trim(saOut(i))\n Next i\n\n SplitTrim = saOut\nEnd Function<\/pre>\n\n\n\nInicializaci\u00f3n: inicialice las variables de matriz con la instrucci\u00f3n Erase.<\/p>\n\n\n\n
' \ubc30\uc5f4 \ubcc0\uc218\ub97c \uc120\uc5b8\ud569\ub2c8\ub2e4.\nDim NumArray(10) As Integer ' \uc815\uc218 \ubc30\uc5f4\uc785\ub2c8\ub2e4.\nDim StrVarArray(10) As String ' \ubcc0\uc218 \ubb38\uc790\uc5f4 \ubc30\uc5f4\uc785\ub2c8\ub2e4.\nDim StrFixArray(10) As String * 10 ' \uace0\uc815 \ubb38\uc790\uc5f4 \ubc30\uc5f4\uc785\ub2c8\ub2e4.\nDim VarArray(10) As Variant ' Variant \ubc30\uc5f4\uc785\ub2c8\ub2e4.\nDim DynamicArray() As Integer ' \ub3d9\uc801 \ubc30\uc5f4\uc785\ub2c8\ub2e4.\nReDim DynamicArray(10) ' \uc800\uc7a5 \uacf5\uac04\uc744 \ud560\ub2f9\ud569\ub2c8\ub2e4.\nErase NumArray ' 0\uc73c\ub85c \uc9c0\uc815\ub41c \uac01 \uc694\uc18c\uc785\ub2c8\ub2e4.\nErase StrVarArray ' \uae38\uc774\uac00 0\uc778 \ubb38\uc790\uc5f4 (\"\")\ub85c \uc9c0\uc815\ub41c \uac01 \uc694\uc18c\uc785\ub2c8\ub2e4. \nErase StrFixArray ' 0\uc73c\ub85c \uc9c0\uc815\ub41c \uac01 \uc694\uc18c\uc785\ub2c8\ub2e4.\nErase VarArray ' Empty\ub85c \uc9c0\uc815\ub41c \uac01 \uc694\uc18c\uc785\ub2c8\ub2e4.\nErase DynamicArray ' \ubc30\uc5f4\uc5d0 \uc758\ud574 \uc0ac\uc6a9\ub418\ub294 \ube48 \uba54\ubaa8\ub9ac\uc785\ub2c8\ub2e4.<\/pre>\n\n\n\n