[ReDim]Dim VarName [(Anfang To Ende)] [As VarTyp][, VarName2 [(Anfang To Ende)] [As VarTyp][,...]]
[ReDim]Dim NombreVar [(inicio To final)] [As TipoVar][, NombreVar2 [(inicio To final)] [As TipoVar][,...]]