using an array of shapes parameter in vb6

[Geoff]

I am using VB6 and have set up a procedure with the parameter LCDLine()
which is an array of shapes. Well something is adrift because it will not
compile on line ....LcdLine(I). Visible = False

Any help will be greatly received
Geoff

Private Sub LCD(ByVal No As Integer, ByRef LcdLine() As Shape)
Dim I As Integer

For I = 1 To 7
LcdLine(I).Visi ble = False
Next I

Select Case No
Case 0
LcdLine(1).Visi ble = True
LcdLine(2).Visi ble = True
LcdLine(3).Visi ble = True
LcdLine(4).Visi ble = True
LcdLine(5).Visi ble = True
LcdLine(6).Visi ble = True
Case 1
LcdLine(2).Visi ble = True
LcdLine(3).Visi ble = True

etc..

[Dean Earley]

Re: using an array of shapes parameter in vb6

Geoff wrote:

I am using VB6 and have set up a procedure with the parameter LCDLine()
which is an array of shapes. Well something is adrift because it will not
compile on line ....LcdLine(I). Visible = False

Why not?

--
Dean Earley (dean.earley@ic ode.co.uk)
i-Catcher Development Team

iCode Systems