![]() |
BCX Console Demonstration Program S151.bas |
DIM
DYNAMIC
a$[
20
]
REDIM
a$[
10
]
a$[
0
]
=
"this"
a$[
1
]
=
"is"
a$[
2
]
=
"a"
a$[
3
]
=
"test"
REDIM
PRESERVE
a$[
20
]
? a$[
0
]
? a$[
1
]
? a$[
2
]
? a$[
3
]
DIM
b$*
10
b$=
"1234567890"
? b$REDIM
b$*
14
b$=
b$&
"ABCD"
? b$REDIM
PRESERVE
b$*
20
b$=
b$&
"EFGHIJKLMNOPQRST"
? b$KEYPRESS