Hi Tim Hutzler, hope you are having a nice day
Tuesday, 28 January 1997 22:06:12, Tim Hutzler wrote to All
Subject: Passing an array.
TH> How does one pass an array to a SUB as in the following?
Try this modufied version:
' We actually spell Aray as Array
DIM Aray1(100) AS STRING 'different arrays, each passed to the same
DIM Aray2(50) AS STRING 'function.
Aray1(1) = "Hello"
Aray2(2) = "to"
Aray2(3) = "you!"
PRINT DoAray (Aray1())
PRINT DoAray (Aray2())
END
FUNCTION DoAray (tAray() AS STRING) 'don't know what goes here
FOR x=1 TO UBOUND(tAray) 'depends on the aray passed
IF LEN(tAray(x)) THEN INCR SCnt
NEXT
FUNCTION = SCnt
END FUNCTION
_ _ _ _
( | )arcel |/eldhuizen
.!. Air Geordis - TNG footwear
--- Terminate 4.00/Pro
# Origin: BBS'ing at Warpspeed * Bodegraven * Offline (119:3102/105)
(1:100/560.0)
---------------
* Origin: Gate United Bbs Systems Fido USA (119:119/0.0) /
|