Hogyan lehet a visual basic 2012 -ben megcsinálni ezt?

Rendben, összerakom neked, és leírom lépésről lépésre, hogyan csinálom, hogy tanulj is valamit. Egyébként nem akarlak elkeseríteni, de ha egy ilyen egyszerű elágazást nem tudsz összerakni, akkor az a játék még nagyon messze van attól, hogy kész legyen (értsd: évek!). A tanácsomat pedig fogadd meg: fogj egy VB könyvet vagy tutorialt és olvasd/csináld végig, ha tényleg játékot akarsz csinálni. Másképp nem fog menni.

Na nézzük.

1. Kiindulunk a pszeudókódomból:

ha (aktuálisEgyenleg - vásárolniKívánTermékÁra < 0)

akkor

... hibaüzenet "Nincs elég gempád!"

különben

... termékEltárolása

... aktuálisEgyenleg -= vásárolniKívánTermékÁra

vége

2. Átírjuk VB-re:

Ehhez a Google-ben rákeresek erre: "visual basic if syntax": [link]

If aktuálisEgyenleg - vásárolniKívánTermékÁra < 0 Then

MsgBox("Nincs elég gempád!")

Else

' termékEltárolása <-- ezt majd te megoldod

aktuálisEgyenleg -= vásárolniKívánTermékÁra

End If

(Egyébként a Then nem is kötelező, érdekes.)

3. Kiegészítjük a változódeklarálásokkal, hogy átvegyük a te értékeidet:

Dim aktuálisEgyenleg as Integer = CInt(Form1.Money.Text)

Dim vásárolniKívánTermékÁra as Integer = CInt(shop.label25.Text)

If aktuálisEgyenleg - vásárolniKívánTermékÁra < 0 Then

MsgBox("Nincs elég gempád!")

Else

' termékEltárolása <-- ezt majd te megoldod

aktuálisEgyenleg -= vásárolniKívánTermékÁra

End If

Ennyi (lett volna) az egész.

(Ha nem lehet ékezetes karaktereket megadni változónévnek, akkor írd át, én most ezzel nem töltök időt.)