2023-05-03 11:06:20 +02:00
|
|
|
== Why is this an issue?
|
|
|
|
|
2021-04-28 16:49:39 +02:00
|
|
|
The use of ``++Option Base++`` to change the lower bound of an array's index values results in confusing code.
|
|
|
|
|
2021-04-28 18:08:03 +02:00
|
|
|
|
2023-05-03 11:06:20 +02:00
|
|
|
=== Noncompliant code example
|
2021-04-28 16:49:39 +02:00
|
|
|
|
2022-02-04 17:28:24 +01:00
|
|
|
[source,vb6]
|
2021-04-28 16:49:39 +02:00
|
|
|
----
|
|
|
|
Option Explicit
|
|
|
|
Option Base 1
|
|
|
|
|
|
|
|
'...
|
|
|
|
Dim MyArray(1 To 3) As Integer
|
|
|
|
For I = 1 To 3
|
|
|
|
MsgBox MyArray(I)
|
|
|
|
Next I
|
|
|
|
----
|
|
|
|
|
2021-04-28 18:08:03 +02:00
|
|
|
|
2023-05-03 11:06:20 +02:00
|
|
|
=== Compliant solution
|
2021-04-28 16:49:39 +02:00
|
|
|
|
2022-02-04 17:28:24 +01:00
|
|
|
[source,vb6]
|
2021-04-28 16:49:39 +02:00
|
|
|
----
|
|
|
|
Option Explicit
|
|
|
|
|
|
|
|
'...
|
|
|
|
Dim MyArray(0 To 2) As Integer
|
|
|
|
For I = 0 To 2
|
|
|
|
MsgBox MyArray(I)
|
|
|
|
Next I
|
|
|
|
----
|
2021-04-28 18:08:03 +02:00
|
|
|
|
|
|
|
|
2021-06-02 20:44:38 +02:00
|
|
|
|
2021-06-03 09:05:38 +02:00
|
|
|
ifdef::env-github,rspecator-view[]
|
2021-09-20 15:38:42 +02:00
|
|
|
|
|
|
|
'''
|
|
|
|
== Implementation Specification
|
|
|
|
(visible only on this page)
|
|
|
|
|
2023-05-25 14:18:12 +02:00
|
|
|
=== Message
|
|
|
|
|
|
|
|
Remove this statement
|
|
|
|
|
2021-09-20 15:38:42 +02:00
|
|
|
|
2021-06-08 15:52:13 +02:00
|
|
|
'''
|
2021-06-02 20:44:38 +02:00
|
|
|
== Comments And Links
|
|
|
|
(visible only on this page)
|
|
|
|
|
2023-05-25 14:18:12 +02:00
|
|
|
=== on 9 Apr 2014, 13:45:38 Pierre-Yves Nicolas wrote:
|
|
|
|
Would the following examples make more sense?
|
|
|
|
|
|
|
|
|
|
|
|
Noncompliant:
|
|
|
|
|
|
|
|
----
|
|
|
|
Option Explicit
|
|
|
|
Option Base 1
|
|
|
|
|
|
|
|
'...
|
|
|
|
Dim MyArray(3) As Integer
|
|
|
|
For I = 1 To 3
|
|
|
|
MsgBox MyArray(I)
|
|
|
|
Next I
|
|
|
|
----
|
|
|
|
|
|
|
|
Compliant:
|
|
|
|
|
|
|
|
----
|
|
|
|
Option Explicit
|
|
|
|
|
|
|
|
'...
|
|
|
|
Dim MyArray(2) As Integer
|
|
|
|
For I = 0 To 2
|
|
|
|
MsgBox MyArray(I)
|
|
|
|
Next I
|
|
|
|
----
|
|
|
|
|
2021-06-03 09:05:38 +02:00
|
|
|
endif::env-github,rspecator-view[]
|