انواع اعلان آرایه ها.....
Dim x As Integer 'Is Not An Array
Dim y(10) As Integer 'Array Include y(0)...y(10)
Dim u(1 To 10) As Integer 'Array Includes U(1)...U(10)
Dim j() As String 'Array But Without Lenght
ReDim j(5 To 100) As String 'Describe An Array Lenght
Me.Caption = LBound(j) 'Returnes 5
Me.Caption = UBound(j) 'Returnes 150
ReDim Preserve j(10 To 150) As String
Me.Caption = LBound(j) 'Returnes 10
Me.Caption = UBound(j) 'Returnes 150
حتماً متوجه استفاده زیاد واژه Redim شدید که میشه هر موقع که خواستید تو برنامه آرایه رو تغییر بدین .البته کلمه Preserve باعث میشه شماره آرایه هایی که دست نخوردن و همچنان در بازه تعریف جدید هم هستن محتوایشان پاک نشه و باقی بمونه.
UBound و Lbound هم خیلی مفیدن.فرض کنید آرایه شما حاوی متغیر های زیادیه و هر لحظه داره با یک Redim در یک حلقه زیادتر میشه پس شما نمیدونین که آخرین شماره از طول آرایتون چنده.شاید تو همون حلقه یک متغیر شمارنده بذارین ولی بهترین راه استفاده از این دو واژست.
Ubound بالاترین شماره از تعریف آرایه و LBound پایین ترین رو نشون میده .