"Hjælp til et plat spil" ikke besvaret

et ekempel er sendt afsted til din mail : kfr@mobilixnet.dk

Hvis ikke du ville have givet mig point (eller ihvertfald dem alle sammen) så sig til. Så opretter jeg et spm. til dig med pointsne..

Nu har jeg oprettet et array som du forklarede, men det virker stadigvæk ikke. Jeg har altså 21 linjer med index fra 0 til 20 og denne kode:

Private Sub Command1_Click()
x = Int(1 + (Rnd * 20))
If Option1.Value = True Then
Line(x).visible = false
Else
    Line(x).Visible = False
    Line(x+1).Visible = False
End If
End Sub

Ikke for at lyde som om jeg tror du er dum (det tror jeg ikke!!) men er navnet på dine lines "line" ??

Hvis ikke skal du erstatte Line med navnet på dine lines.

f.eks.

lneLine

Mine lines hed line. Det virkede ikke. Jeg prøvede så at sætte et tal efter line altså sådan: line1(x), og det viste sig at virke. Hvis du er interesseret, kan jeg sendec mit spil og koden til dig

Hilsen (den måske VB-dumme) Karl Fritjof

<< karl_fritjof >>

Ja tak, send til binaries@tdaugaard.dk så skal jeg nok kigge på det for dig.

Må jeg få nogle point for dette ubesvarede spm???+

<< spam2000 >>

Jeg kan ikke rigtigt se hvad du har med sagen at gøre !?!