Brauche Hilfe bei Visual Basic Schulprojekt

[DFYX]

Code:

randnum = random(1, 4) ' Zufallszahl von 1 bis 4
while randnum = richtig.text ' Solange die Zufallszahl mit der richtigen Antwort identisch ist...
 randnum = random(1, 4) ' "würfeln" wir sie neu aus
Wend

if richtig.text <> 1 AND randnum <> 1 Then A.visible = false
if richtig.text <> 2 AND randnum <> 2 Then B.visible = false
if richtig.text <> 3 AND randnum <> 3 Then C.visible = false
if richtig.text <> 4 AND randnum <> 4 Then D.visible = false

So in etwa sähe das in VB aus. Nur bei der Zufallszahl bin ich mir nicht sicher. Keine Ahnung, ob das tut, aber sieht gut aus.

@Jeez:
Wir warten immer noch auf den Zettel. Ich denk zwar nich, dass ich ne Chance hab, aber wer weiß...

[Jesus_666]

@Jeez:
Wir warten immer noch auf den Zettel. Ich denk zwar nich, dass ich ne Chance hab, aber wer weiß...

...

Ich kriege die ganzen Zettel erst am Donnerstag wieder. Geduld, junger Padawan...