Mega Code Archive

 

Categories / VisualBasic Script / Data Type Functions

 

Using the IsArray Function

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