Zitat:
Zitat von Haseron
Das Spiel sollte nicht zu komplex sein aber auch nicht zu einfach.
|
Da wird dir so keiner helfen können, weil niemand weiß, was für dich schwer oder leicht ist und was du für Kenntnisse in Excel/VBA hast. Am Besten du googlst erstmal danach, um dir Anregungen zu holen. Da gibt es die einfachsten Zahlenratespiele oder Kopfrechnenspiele bis zu Umsetzungen bekannter Klassiker wie Minesweeper...
Hier ist mal ein kleiner VBA_Code zum Zahlenraten... also einen Commandbutton anlegen und folgenden Code einfügen...
Code:
Private Sub CommandButton1_Click()
Dim i As Integer
Dim n
n = 1
[A:A].ClearContents
Randomize
i = Int((100 - 0 + 1) * Rnd + 0)
Do
a = InputBox("Bitte raten.")
If i > a Then
MsgBox "Grösser"
Cells(n, 1).Value = "Versuch " & n & " war " & a & ", die Lösung ist größer."
End If
If i < a Then
MsgBox "Kleiner"
Cells(n, 1).Value = "Versuch " & n & " war " & a & ", die Lösung ist kleiner."
End If
If i = a Then
MsgBox "Gewonnen"
Cells(n, 1).Value = a & " ist richtig! Das waren " & n & " Versuche."
Exit Sub 'Damit es keine Endlosschleife wird
End If
n = n + 1
Loop
End Sub