Option Base 1

  • Thread starter Thread starter Bill
  • Start date Start date
B

Bill

Option Base 1 does not seem to be
effective for dynamically allocated
arrays.

E.g.,
Class module:
Option Compare Database
Option Explicit
Option Base 1
..
Several subs.
..
..
Private Function VDate(strMD As String) As Integer
Dim Ar() As String
Ar = Split(strMD , "/") 'E.g., "01/01"

The Ubound(Ar) equals 1, not 2

End Function
 
Bill said:
Option Base 1 does not seem to be
effective for dynamically allocated
arrays.

E.g.,
Class module:
Option Compare Database
Option Explicit
Option Base 1
.
Several subs.
.
.
Private Function VDate(strMD As String) As Integer
Dim Ar() As String
Ar = Split(strMD , "/") 'E.g., "01/01"

The Ubound(Ar) equals 1, not 2

End Function
Click to expand...


VBA Help for the Split function explicitly states that it
creates a zero based array.

AFAIK, OPTION BASE only sets the default lower bound when
you omit it in a declaration staement, e.g. Dim Ary(10).
Personally, I always use the standard 0 based arrays OR I
explicitly declare the lower bound, e.g. Dim Ary(1 To 10)
 
Marshall Barton said:
VBA Help for the Split function explicitly states that it
creates a zero based array.

AFAIK, OPTION BASE only sets the default lower bound when
you omit it in a declaration staement, e.g. Dim Ary(10).
Personally, I always use the standard 0 based arrays OR I
explicitly declare the lower bound, e.g. Dim Ary(1 To 10)
Click to expand...

This was the first time I'd ever tried the use of
Option Base 1. In the past I've always used
0 origin indexing. And, as I use the Split function
quite often, I just didn't recall the explicit reference
to the base of its allocated arrays..............never
should have "changed horses".

Thanks,
Bill
 
Back
Top