[VB] Programm nach 9 Minuten maximieren

Guten Abend,

ich möchte mit Visual Basic eine kleine Funktion erstellen, die ein bestimmtes Programm, um genau zu sein die gta_sa.exe nach 9,5-Minuten maximiert, sprich aus dem minimierten Modus in der Taskleiste, maximiert. Da ich nun aber garkeine Ahnung habe, wie man sowas lösen kann, und schon etliche Websiten durchforstet habe, und kein bißchen schlauer wurde, frage ich einfach hier. [size=10]Ich würde mich freuen, wenn es nicht nur Stichworte, sondern sogar vielleicht schon das ganze Programm + Sourcecode (zum lernen und verstehen) wäre.

Beste Grüße, schönen Abend noch und happy Halloween,
Montero

Ich verstehe nicht, wie ich einen Timer erstellen kann... Der vorherige Link konnte mir nicht helfen...
Wie kann ein einen Timer für 9,5Minuten starten, und dann die Funktion des Timers abrufen?

Wo ist der Fehler in diesem Code? Ich kann das Programm nicht ausführen, es soll ein fehler vorlegen.. Wie deklariere ich den Timer?

Public Class Form1


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("Du hast den AFK Timer gestartet. Du wirst in '9,5 Minuten' wieder automatisch in das Spiel gebracht...", MsgBoxStyle.Information, "AFK-Timer")
        afktimer.intervall = 10000
        afktimer.enabled = True
    End Sub


    Private Sub Timertick() Handles afktimer.tick
        ShowWindow(Process.GetProcessesByName("samp.exe").First().MainWindowHandle, WindowShowStyle.ShowMaximized)
        afktimer.enabled = False


    End Sub
End Class

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles afktimer.Tick


    End Sub

Wie kann ich den Timer nun unter dem Button:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("Du hast den AFK Timer gestartet. Du wirst in '9,5 Minuten' wieder automatisch in das Spiel gebracht...", MsgBoxStyle.Information, "AFK-Timer")
    End Sub

starten?

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("Du hast den AFK Timer gestartet. Du wirst in '9,5 Minuten' wieder automatisch in das Spiel gebracht...", MsgBoxStyle.Information, "AFK-Timer")
        afktimer.Start()
    End Sub


    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles afktimer.Tick
        MsgBox("Zeit ist um^^", MsgBoxStyle.Information, "AFK-Timer")
    End Sub

Nun werde ich mit "Die Zeit ist um" zugespammt, obwohl ich nach dem Timer (100) eine Nachricht mit Die Zeit ist um erhalten will.

Ich möchte dass nach Ende des timers, die msgbox angezeigt wird. Das was du meinst, verstehe ich nicht...

Zitat von xTheTimex

Sie wird doch angezeigt oder nicht? Du must den Intervall des Timers ändern, da er standart auf 100 steht (100ms), du aber 7,5 Minuten haben willst.

Danke für deine Hilfe, ich habe es hinbekommen.

Zitat von lovelins12

Code

ShowWindow(Process.GetProcessesByName("League of Legends").First().MainWindowHandle, WindowShowStyle.ShowMaximized)

sollte helfen

Hilft leider nicht, da die Funktion nicht geht.
"WindowShowStyle" wurde nicht deklariert. Auf das Objekt kann aufgrund seiner Schutzstufe möglicherweise nicht zugegriffen werden.
Google hilft mir garnicht, wirklich, ich habe jetzt 1-Stunde lang gegooglet...

Gut, wie funktioniert das mit dem Prozessnamen? Ist das SA-MP 0.3 oder samp.exe?

Ich möchte aber mit einem normalen Programm, also keinem Spiel anfangen, um es zu testen, da das schneller gehen würde.

//
"ShowWindow" wurde nicht deklariert. Auf das Objekt kann aufgrund seiner Schutzstufe möglicherweise nicht zugegriffen werden.