Option Base Statement

реж рд╡рд╛ резрдХреЛ рд░реВрдкрдорд╛ рдПрд░реЗрдХреЛрд▓рд╛рдЧрд┐ рдкреВрд░реНрд╡рдирд┐рд░реНрдзрд╛рд░рд┐рдд рддрд▓реНрд▓реЛ рд╕рд┐рдорд╛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдЧрд░реНрджрдЫ ред

рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:

Option Base { 0 | 1}

рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:

рдЪреЗрддрд╛рд╡рдиреА рдкреНрд░рддрд┐рдорд╛

рдореЛрдбреНрдпреБрд▓рдорд╛ рдХрд╛рд░реНрдпрд╛рдиреНрд╡рдпрди рдпреЛрдЧреНрдп рдХрд╛рд░реНрдпрдХреНрд░рдо рд╕рдЩреНрдХреЗрдд рдЕрдШрд╛рдбрд┐ рдпреЛ рдХрдерди рдердкреНрдиреБ рдкрд░реНрджрдЫ ред


рдЙрджрд╛рд╣рд░рдг:

Option Base 1

Sub ExampleOptionBase

   Dim sVar(20) As String

   MsgBox LBound(sVar())

End Sub