Codes Aktivieren / Deaktivieren

  • VB.NET

Es gibt 13 Antworten in diesem Thema. Der letzte Beitrag () ist von Nikx.

    Codes Aktivieren / Deaktivieren

    Hallo Community,
    Ich hab gerade ein Problem. Sorry falls dies keine Anfänger frage ist.

    Ich möchte ein Text-Spiel erstellen.
    Dazu mache ich eine einfache "If" Abfrage.
    Da natürlich bestimmte "If" Abfragen erst später aktiviert werden sollen wollte ich fragen wie man bestimmte
    Code Zeilen Aktivieren bzw. Deaktivieren kann.

    MfG

    Erstell dir ein Boolean-Wert, und eine If-Abfrage, die diesen Wer überprüft. Wenn der Moment erreicht ist, wo der bestimmte Code ausgeführt wird, setzt du die Variable auf true, und fertig. Hoffe, das war verständlich.

    mathisderaltefuchs schrieb:

    mit subs einfach

    VB.NET-Quellcode

    1. sub funktionsname
    und zwischen die klammern deinen code

    und aufrufen kannst du diesen mit

    VB.NET-Quellcode

    1. funktionsname()


    funktionsname kannst du selbst wählen.
    Tja damit ruft man was auf eine Funktion... Aber ich möchte ja einige Funktionen auch Deaktivieren...

    VB.NET-Quellcode

    1. Public Class Form1
    3. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    4. funktion_aufrufen()
    5. End Sub
    7. Public Sub funktion_aufrufen()
    8. MsgBox("Diese wird nun aufgerufen da sie sich im Form_Load befindet.")
    9. End Sub
    11. Public Sub funktion_nicht_aufrufen()
    12. MsgBox("Diese Funktion wird nicht aufgerufen, da sie sich NICHT in der Form_Load befindet.")
    13. End Sub
    14. End Class


    Das ist das alles

    Edit:

    was du auch machen kannst ist,
    das du unerwünschten Code auskommentierst. Markiere dazu den Text und drücke dann die tastenkombination
    STRG + C
    danach
    STRG + K

    Ich glaube was du willst ist das:

    VB.NET-Quellcode

    1. Public yes2 As Boolean
    3. Public Sub Funktion1
    4. MsgBox("Funktion1 ausgeführt, Funktion2 nun aktiviert!")
    5. yes2 = True
    6. End Sub
    8. Public Sub Funktion2
    9. If yes2 = True Then
    10. MsgBox("Funktion1 bereits ausgeführt, Funktion2 geht!")
    11. ElseIf yes2 = False Then
    12. MsgBox("Führe zuerst Funktion1 aus!")
    13. End Sub


    Grüße
    "Life isn't about winning the race. Life is about finishing the race and how many people we can help finish the race." ~Marc Mero

    Nun bin ich also auch soweit: Keine VB-Fragen per PM! Es gibt hier ein Forum, verdammt!

    In diesem Fall mach:

    VB.NET-Quellcode

    1. Public Wald AS Boolean
    2. Public Home As Boolean
    3. Public Osten As Boolean
    6. Public Sub GeheNachOsten
    7. If Osten = False And Home = False Then
    8. Osten = True
    9. MsgBox("Nach Osten gegangen!")
    10. Else
    11. MsgBox("Sie können in der derzeitigen Position nicht nach Osten gehen!")
    12. End If
    13. End Sub
    15. Public Sub GeheNachHause
    16. If Osten = False And Home = False Then
    17. Home = True
    18. MsgBox("Nach Hause gegangen!")
    19. Else
    20. MsgBox("Sie können in der derzeitigen Position nicht nach Hause gehen!")
    21. End If
    22. End Sub
    24. Public Sub GeheZumWald
    25. If Wald = False Then
    26. Wald = True
    27. MsgBox("Zum Wald gegangen!")
    28. Else
    29. MsgBox("Sie können in der derzeitigen Position nicht zum Wald gehen!")
    30. End If
    31. End Sub


    Statik wäre dann:
    -Osten-
    -Wald-
    -Haus-

    Grüße
    "Life isn't about winning the race. Life is about finishing the race and how many people we can help finish the race." ~Marc Mero

    Nun bin ich also auch soweit: Keine VB-Fragen per PM! Es gibt hier ein Forum, verdammt!

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „Nikx“ ()

Facebook
Telefonspende