十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
数组中的第一罩乎个元素的下标称为下界,最后一个橘闷颤元素的下标称为上界,在VB.NET中,为了和其他语言更加易于协同操作,数组的下界均设定为0,不允许声明一个下界为1的数组圆败,因此Option Base语句不再被VB.NET支持。
网站建设哪家好,找创新互联!专注于网页设计、网站建设、微信开发、小程序制作、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了平远免费建站欢迎大家使用!
使用动态数组,下面给出一个例子;
Dim i As Integer
Dim T() As Integer '预先声明一个动态数组
轿敬乎 Dim n As Integer
n = 5
ReDim T(n) '根据给出的n值5,动态改变数组的规模
For i = 1 To n
T(i) = i
闭悉 MsgBox(T(i))
Next
说明:VB默认稿缺数组的下标的下限是0,即上例里的数组T的下标分别有0,1,2,3,4,5
肯枯州洞定的没枯,不然怎么形成数组呢?在VB中的数组下标的下界可以不是0例如ARR(2 TO 8) ,但是在VB.NET2010中迹岁下标必须是0开始,而且所有数组都是动态的。
VB中定义数组的起始下标默认从0开始。用Option Base 1语句运世辩将数组默认起始下标设置为 1。
(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,其他值是非法的。