VBA/Excel/Access/Word/Data Type Functions/IsArray — различия между версиями
Admin (обсуждение | вклад) м (1 версия) |
Admin (обсуждение | вклад) м (1 версия) |
(нет различий)
|
Текущая версия на 15:48, 26 мая 2010
Is a variable an array
<source lang="vb">
Sub ArrayTest()
Dim intNum1 As Integer Dim intNum(1 To 10) As Integer Debug.Print "intnum1: " & IsArray(intNum1) Debug.Print "intnum: " & IsArray(intNum)
End Sub
</source>
Using the IsArray Function
<source lang="vb">
Sub IsThisArray()
Dim tblNames() As String Dim totalTables As Integer Dim counter As Integer totalTables = 10 ReDim tblNames(1 To totalTables) If IsArray(tblNames) Then MsgBox "The tblNames is an array." End If
End Sub
</source>