Supportnet Computer
Planet of Tech

Supportnet / Forum / Skripte(PHP,ASP,Perl...)

Visual Basic Code: MsgBox mit Ereignis





Frage

Guten Morgen Supportnetler :) Ich hätte da eine kleine Frage an Euch... Seit kurzem lerne ich das Programmieren mit Visual Basic. Bei meinem 1. Projekt habe ich folgendes versucht: Sobald man auf einem Button klickt (Herunterfahren - Kommando [Shell ("%windir%\system32\shutdown.exe /s /f /t 0")]), erscheint da eine Messagebox mit zwei Antworte-Möglichkeiten: Yes / No Sobald man auf Yes drückt, erscheint eine weitere Meldung: Aufwiedersehen! und danach wird der Computer heruntergefahren. Bisher sieht's so aus (nur leider funktioniert es nicht :/ ): [code]Private Sub Command10_Click() If MsgBox("Wollen Sie den Computer wirklich Herunterfahren?", vbQuestion + vbYesNo, "Test fragt:") = vbYes Then MsgBox "Aufwiedersehen!", vbExclamation, "Test meldet:" Shell ("%windir%\system32\shutdown.exe /s /f /t 2") End Else End If End Sub[/code] Hat einer von Euch vielleicht eine gescheite Lösung? :)

Antwort 1 von coros

Hallo breznica,

nachfolgender VB-Code sollte das machen, was Du Dir vorstellst.

Private Sub Command10_Click()
      If MsgBox("Wollen Sie den Computer wirklich Herunterfahren?", vbQuestion + vbYesNo, "Test fragt:") = vbYes Then
      MsgBox "Aufwiedersehen!", vbExclamation, "Test meldet:"
      Shell ("shutdown -s -t 00")
      End
End Sub



MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Antwort 2 von breznica

Vielen vielen dank, bloss da fehlte ein 'End If', ist aber nicht so tragisch, nochmals, ich danke Ihnen, hat alles geklappt :)

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: