189 8069 5689
VB中定义数组的起始下标默认从0开始。用Option Base 1语句将数组默认起始下标设置为 1。
创新互联拥有一支富有激情的企业网站制作团队，在互联网网站建设行业深耕10多年，专业且经验丰富。10多年网站优化营销经验，我们已为上千中小企业提供了成都做网站、网站设计、外贸营销网站建设解决方案，按需求定制开发，设计满意，售后服务无忧。所有客户皆提供一年免费网站维护!
（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，其他值是非法的。
意思是：没有给数组分配空间。
造成的原因：引用了不存在的数组元素.
下标可能比下标范围大或小，或是在应用程序中这一边的数组没有指定范围。检查数组的声明以确认其上界和下界。若使用的是重新指定范围的数组，应使用 UBound 和 LBound 函数来决定数组访问。如果索引指定为变量，应检查变量名的拼写。
声明数组时没有指定元素的数目。例如，下列的代码就会导致此错误：
Dim MyArray() As Integer
MyArray(8) = 234 ' 导致错误 9。
Visual Basic 并不会将没有指定范围的数组自动设为 0 – 10。相反必须使用 Dim 或 ReDim 来指定数组中元素的数目。
扩展资料：
VB语言特色：
制作应用程序安装盘等提供了友好的集成开发环境。
1、可视化的设计平台：
在使用传统的程序设计语言编程时，一般需要通过编写程序来设计应用程序的界面（如界面的外观和位置等），在设计过程中看不见界面的实际效果。而在Visual Basic 6.0中，采用面向对象程序设计方法（Object-Oriented Programming），把程序和数据封装起来作为一个对象，每个对象都是可视的。
开发人员在界面设计时，可以直接用Visual Basic 6.0的工具箱在屏幕上"画"出窗口、菜单、命令按键等不同类型的对象，并为每个对象设置属性。开发人员要做的仅仅是对要完成事件过程的对象进行编写代码，因而程序设计的效率可大大提高。
2、事件驱动的编程机制：
面向过程的程序是由一个主程序和若干个子程序及函数组成的。程序运行时总是先从主程序开始，由主程序调用子程序和函数，开发人员在编程时必须事先确定整个程序的执行顺序。
Visual Basic 6.0事件驱动的编程是针对用户触发某个对象的相关事件进行编码，每个事件都可以驱动一段程序的运行。开发人员只要编写响应用户动作的代码。这样的应用程序代码精简，比较容易编写与维护。
3、结构化的程序设计语言：
Visual Basic 6.0具有丰富的数据类型和众多的内部函数。其采用模块化和结构化程序设计语言，结构清晰，语法简单，容易学习。
4、强大的数据库功能：
Visual Basic 6.0利用数据控件可以访问Access、FoxPro等多种数据库系统，也可以访问Excel、Lotus等多种电子表格。
参考资料来源：百度百科-下标越界
参考资料来源：百度百科-Visual Basic
数组中的第一个元素的下标称为下界，最后一个元素的下标称为上界，在VB．NET中，为了和其他语言更加易于协同操作，数组的下界均设定为0，不允许声明一个下界为1的数组，因此Option Base语句不再被VB．NET支持。