VB中定义数组的起始下标默认从0开始。用Option Base 1语句将数组默认起始下标设置为 1。
创新互联致力于互联网网站建设与网站营销，提供网站制作、成都网站建设、网站开发、seo优化、网站排名、互联网营销、成都小程序开发、公众号商城、等建站开发，创新互联网站建设策划专家，为不同类型的客户提供良好的互联网应用定制解决方案，帮助客户在新的全球化互联网环境中保持优势。
（1）不使用Optioan Base 语句，数组起始下标默认为 0
Option Explicit
' 没有用 Option Base 语句，数组下标从0开始
' 因此，数组 a 包含了 11 个元素
Dim a(10) As Integer
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 10
a(i) = i
Next
End Sub
（2）用Optioan Base 1 语句，数组起始下标默认为 1
Option Explicit
Option Base 1
' 使用了 Option Base 1语句，数组下标从1开始
' 因此，数组 a 包含了 10 个元素
Dim a(10) As Integer
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 10 '如果 i=0，则会出现“下标越界”错误！
a(i) = i
Next
End Sub
（3）在VB Option Base 语句中参数只能是 0 或 1，其他值是非法的。
是你数组维数决定的
你定义数组维数为10 那么下标为0-9 最大下标9
你定义数组维数为20 那么下标为0-19 最大下标19
设数组为a(10)
dim temp as integer
dim j as integer
for i=0 to 10
if tempa(i) then
temp=a(i)
j=i
end if
next
temp就是最大值，而j就是数组的下际
肯定的，不然怎么形成数组呢？在VB中的数组下标的下界可以不是0例如ARR(2 TO 8) ，但是在VB.NET2010中下标必须是0开始，而且所有数组都是动态的。