|
MMG さん、こんばんわ。
>何か理解するためのヒントいただければ幸いです。どなたかよろしくお願い
>いたします。
Bookに標準モジュールを二つ追加し、
片方に。
'=========================
Sub main()
MsgBox test1, vbInformation, "Option Base 0"
MsgBox test2, vbInformation, "Option Base 1"
End Sub
Function test1() As String
'同じようにバリアントで宣言し、配列に。
Dim dt As Variant
dt = Array(1, 2)
test1 = LBound(dt) & " to " & UBound(dt)
End Function
'=========================
もう一方に。
'=========================
Option Base 1
Function test2() As String
'同じようにバリアントで宣言し、配列に。
Dim dt As Variant
dt = Array(1, 2)
test2 = LBound(dt) & " to " & UBound(dt)
End Function
'=========================
これでMainを実行してみてください。
慣れたらどうってことない事ですが、インデックス値は0から始まるよりも1からの方がわかりやすいと思いませんか?
|
|