Option Explicit
Dim a(3)

Private Sub Form_Load()
ReDim a(3)
End Sub

Но что же происходит? Генерируется ошибка "Array already dimensioned", то есть массив уже имеет размер. Для корректной декларации массива применение инструкции Dim должно быть следующим образом

Option Explicit
Dim a()

Private Sub Form_Load()
ReDim a(3)
End Sub

То есть необходимо оставлять размерность массива пустой [Dim a()]