Option Base Statement
реж рд╡рд╛ резрдХреЛ рд░реВрдкрдорд╛ рдПрд░реЗрдХреЛрд▓рд╛рдЧрд┐ рдкреВрд░реНрд╡рдирд┐рд░реНрдзрд╛рд░рд┐рдд рддрд▓реНрд▓реЛ рд╕рд┐рдорд╛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдЧрд░реНрджрдЫ ред
рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:
Option Base { 0 | 1}
рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:
рдореЛрдбреНрдпреБрд▓рдорд╛ рдХрд╛рд░реНрдпрд╛рдиреНрд╡рдпрди рдпреЛрдЧреНрдп рдХрд╛рд░реНрдпрдХреНрд░рдо рд╕рдЩреНрдХреЗрдд рдЕрдШрд╛рдбрд┐ рдпреЛ рдХрдерди рдердкреНрдиреБ рдкрд░реНрджрдЫ ред
рдЙрджрд╛рд╣рд░рдг:
Option Base 1
Sub ExampleOptionBase
Dim sVar(20) As String
MsgBox LBound(sVar())
End Sub