【Microsoft Visual Studio】VB.net Lbound() 及 Ubound()

Lbound()--->代表是列出陣列裡某維度的下限值
Ubound()--->則是代表列出陣列裡某維度的上限值
語法
UBound(arrayname[, dimension])

Private Sub Command1_Click()
Dim MyArr(5000)
Min = LBound(MyArr)
'因為不是陣列, 所以Min = 0
End Sub
Private Sub Command1_Click()
Dim MyArr(50 To 1000)
Min = LBound(MyArr)
'因為是陣列50~100, 所以Min = 50
End Sub
Private Sub Command1_Click()
Dim MyArr(50 To 1000, 70)
Min = LBound(MyArr, 2)
'第一個位置是陣列50~1000
'第二個位置不是陣列, 所以Min = 0
End Sub
Private Sub Command1_Click()
Dim MyArr(50 To 1000, 111 To 222)
Min = LBound(MyArr, 2)
'第一個位置是陣列50~1000
'第二個位置是陣列111~222, 所以Min = 111
End Sub
Private Sub Command1_Click()
Dim MyArr(5, 5, 5, 5, 5, 5, 2 To 6)
Min = LBound(MyArr, 7)
'第七個位置是陣列, 所以Min = 2
End Sub

-----------------------------------------------------------------------------
若使用Option Base 1

Option Base 1
Private Sub Command1_Click()

Dim MyArr(5000)

Min = LBound(MyArr)

'因為不是陣列, 所以Min = 1

End Sub

Private Sub Command1_Click()

Dim MyArr(50 To 1000)

Min = LBound(MyArr)

'因為是陣列50~1000, 所以Min = 50

End Sub

Private Sub Command1_Click()

Dim MyArr(50 To 1000, 70)

Min = LBound(MyArr, 2)

'第二個位置不是陣列, 所以Min = 1

End Sub

Private Sub Command1_Click()

Dim MyArr(50 To 1000, 111 To 222)

Min = LBound(MyArr, 2)

'第二個陣列111~222 所以Min = 111

End Sub