Lo normal es hacer esto:
Código:
Private Sub Command1_Click()
Dim matriz() As String
ReDim matriz(0 to 2)
matriz(0)="jhgjh"
matriz(1)="jadfjhdf"
matriz(2)="jhgjhgjhJ"
End Sub
Código:
Private Sub Command1_Click()
Dim matriz() As String
ReDim matriz(0 To 2)
matriz() = "adhffvsdhfs","gdfgdfg","xfxgdfg"
End Sub
PD: Ya se que es chorra la pregunta