A.Dim gg[1,5] As String
B.Dim gg[1 To 5,1 To 5] As String
C.Dim gg(1 To 5) As String
D.Dim gg[1:5,1: 5] As String