Dim i As Integer ' 整数
Dim i As Double ' 倍精度実数
Dim i As String ' 文字列
Dim i As Object ' オブジェクト
Dim i As Boolean ' ブール
Dim i() As Integer ' 可変長配列
Dim i(3) As Integer ' 固定長配列
Dim i(3,4) As Integer ' 二次元配列
Function func(array() As Double)
...
End Function