xX Da Master Xx
Gebruiker
- Lid geworden
- 15 feb 2008
- Berichten
- 31
Ik heb een programma gemaakt en het werkt helemaal maar nu wil ik er een For statement instoppen maar weet niet hoe...
Kunnen jullie me helpen?
Dit is men code:
En daar wil ik een For in krijgen zodat telkens dat je verkeert raad er een kans af gaat(en ook getoont word in txtKansen...10-1=9 kansen)
Kunnen jullie me helpen?
Dit is men code:
Code:
Private Sub cmdRaden_Click()
Dim Kansen As String
txtkansen = 10
Kansen = txtkansen
If txtkansen = 0 Then
MsgBox "U hebt geen punten meer! Gelieven nieuwe punten te kopen.", vbExclamation, "Punten te kort"
ElseIf txtGetal = Int(Rnd * 10) Then
MsgBox "Proficiat! U raden het juiste getal!", vbExclamation, "Proficiat"
txtkansen = Kansen + 1
Else
MsgBox "Helaas pindakaas! Het is niet juist, volgende keer beter!", vbExclamation, "Helaas"
End If
End Sub
En daar wil ik een For in krijgen zodat telkens dat je verkeert raad er een kans af gaat(en ook getoont word in txtKansen...10-1=9 kansen)