UBound Function
αααα‘ααβαααααααβααΆαβααΎβααβα’αΆααβαα½αΒ α
ααΆαααβααααααα α
UBound (ArrayName [, Dimension])
αααααβαααα‘αα α
α ααα½αβααα
αααΆαααΆαααααα α
ArrayName α αααααβααβα’αΆαα αααβα’αααβα ααβαααααβαααααααβααΆαβααΎ (Ubound) α¬βααΆαβααααα (LBound)Β α
[Dimension] α α ααα½αβαααβαααβαααααΆααβααΎβαα·ααΆαααβααΆβαα½αβααΎααααΈβαααα‘ααβαααααααβααΆαβααΎ (Ubound) α¬βααΆαβααααα (LBound)Β α ααααα·αβααΎβααααΆαβαααααβααααΌαβααΆαβαααααΆαα αααααααβααβαα·ααΆαααβααΈβαα½αβααααΌαβααΆαβαααα‘ααΒ α
α§ααΆα ααα α
Sub ExampleUboundLbound
Dim sVar(10 To 20) As String
Print LBound(sVar())
Print UBound(sVar())
End Sub
Sub ExampleUboundLbound2
Dim sVar(10 To 20,5 To 70) As String
Print LBound(sVar()) REM Returns 10
Print UBound(sVar()) REM Returns 20
Print LBound(sVar(),2) REM Returns 5
Print UBound(sVar(),2) REM Returns 70
End Sub