項目

　配列かどうか調べる(IsArray)

概要

　IsArrayを利用して配列かどうか調べる事ができます。
　配列の場合には真が帰ってきます。

例

Option Compare Database
Option Explicit

'++++++++++++++++++++++++++++++++++++++++++++++++++
'■配列かどうか調べる(IsArray)
'++++++++++++++++++++++++++++++++++++++++++++++++++
Private Sub コマンド0_Click()

    Dim a
    Dim b()

    '配列かどうか調査する
    If IsArray(a) Then
        Debug.Print "配列です"
    Else
        Debug.Print "配列ではありません"
    End If

    '配列かどうか調査する
    If IsArray(b) Then
        Debug.Print "配列です"
    Else
        Debug.Print "配列ではありません"
    End If

End Sub