Data Type Functions VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Data Type Functions
  4. Use LBound function to get lower bound
Sub Array1()
  Dim Data(10) As Integer
  Dim Message As String, i As Integer
  For i = LBound(Data) To UBound(Data)
    Data(i) = i
  Next i
  MsgBox "Lower Bound = " & LBound(Data) & vbCr
End Sub