Cube 2D Brauche Hilfe bei Key Steuerung

  • VB.NET

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Eistee.

    Cube 2D Brauche Hilfe bei Key Steuerung

    Hallo Leute ich arbeite an einem Spiel in 2D es heißt Cube 2D und bis jetzt hab ich die Steuerung mit W A S D mit Case Gesteuert, Wie mach ich das jetzt auf die Pfeiltasten?

    Hier mein Code (Ist Nicht der Ganze sondern nur der mit den Keys damit keiner drauf kommt mir den code zu klauen!)

    VB.NET-Quellcode

    1. For charabewegung = 1 To 255
    2. tastendruck = GetAsyncKeyState(charabewegung)
    3. If tastendruck = -32767 Then
    4. Select Case charabewegung
    5. Case 65
    6. chara.Left -= 32
    7. Case 68
    8. chara.Left += 32
    9. Case 83
    10. chara.Top += 32
    11. Case 87
    12. chara.Top -= 32
    13. Case 49
    14. Dim block As New PictureBox
    15. block.Width = 32
    16. block.Height = 32
    17. block.BackgroundImageLayout = ImageLayout.Zoom
    18. block.BackgroundImage = Image.FromFile("src/gras.png")
    19. block.Left = chara.Right
    20. block.Top = chara.Bottom - 32
    21. Controls.Add(block)
    22. End Select
    23. End If
    24. Next
    25. End Sub


    Edit: Mal Wieder ist der Code durcheinander -.-'
    Edit by der_Kurt:
    Versuch mal beim Schreiben des Beitrags die Quellcode-Ansicht
    * Quellcode formatiert *

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „der_Kurt“ ()

    Der Post ist ein Knalller x'D

    1. Poste den Code mal korrekt.
    2. So einen total überflüssigen Kommentar "damit keiner drauf kommt mir den code zu klauen!" ist mehr wie unnötig, wer möchte denn bitte diese 20 zeilen C&P waste Code klauen.

    Du benutzt "GetAsyncKeyState" mit W, A, S, D und weißt nicht wie Du es auf die Pfeiltasten abändern kannst?
    Wenn Du doch WASD benutzt, müsstest Du doch auch die Pfeiltasten umsetzen können?
    Schau dir das ganze doch noch einmal in der MSDN an.

    Dieser Beitrag wurde bereits 8 mal editiert, zuletzt von „Eistee“ ()