der verweis auf einen nicht freigegebenen member erfordert einen objektverweis
- VB.NET
Sie verwenden einen veralteten Browser (%browser%) mit Sicherheitsschwachstellen und können nicht alle Funktionen dieser Webseite nutzen.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Es gibt 37 Antworten in diesem Thema. Der letzte Beitrag () ist von P3KK3Y.
-
-
Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
-
-
Mhhh es passiert garnichts also ich schicke mal alles:
VB.NET-Quellcode
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim Stunde As Integer = NumericUpDown1.Value Dim Minute As Integer = NumericUpDown2.Value Dim Sekunde As Integer = NumericUpDown3.Value 'Dim pr As New Process() If My.Computer.Clock.LocalTime.Hour = Stunde & My.Computer.Clock.LocalTime.Minute = Minute & My.Computer.Clock.LocalTime.Second = Sekunde Then
- 'pr.StartInfo.FileName = TextBox1.Text 'pr.Kill() Process.GetProcessesByName(TextBox1.Text)(0).Kill() MsgBox("Prozess geschlossen", 64, "Erfolgreich!") If RadioButton1.Checked Then Shell("shutdown -s -f") End If If RadioButton2.Checked Then Shell("shutdown -r -f") End If If RadioButton4.Checked Then Shell("shutdown -l -f") End If End If End Sub
-
Füge da mal bitte ein paar Zeilenumbrüche ein.Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
-
Dann mach 2 Stück rein pro Zeile.Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
VB.NET-Quellcode
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim Stunde As Integer = NumericUpDown1.Value
- Dim Minute As Integer = NumericUpDown2.Value
- Dim Sekunde As Integer = NumericUpDown3.Value
- 'Dim pr As New Process()
- If My.Computer.Clock.LocalTime.Hour = Stunde & My.Computer.Clock.LocalTime.Minute = Minute & My.Computer.Clock.LocalTime.Second = Sekunde Then
- 'pr.StartInfo.FileName = TextBox1.Text
- 'pr.Kill()
- Process.GetProcessesByName(TextBox1.Text)(0).Kill()
- MsgBox("Prozess geschlossen", 64, "Erfolgreich!")
- If RadioButton1.Checked Then
- Shell("shutdown -s -f")
- End If
- If RadioButton2.Checked Then
- Shell("shutdown -r -f")
- End If
- If RadioButton4.Checked Then
- Shell("shutdown -l -f")
- End If
- End If
- End Sub
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „P3KK3Y“ ()
-
-
P3KK3Y schrieb:
If My.Computer.Clock.LocalTime.Hour = Stunde & My.Computer.Clock.LocalTime.Minute = Minute & My.Computer.Clock.LocalTime.Second = Sekunde Then
Ich denke, da kommt er nicht vorbei.
Erstell Dir aus den Werten eine DateTime-Struktur (Yahr, Monat, Tag, Stunde, Minute und Sekunde) einen Zielwert
und teste, ob die aktuelle Zeit größer ist:
Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
Danke! Puhh endlich kann der Code richtig angezeigt werden..
Ähm Shell nutze ich, weil es für mich die einzigste möglichkeit ist den PC nach dem Vorgang zu beenden
Ich hab auch davon gehört das es eine Shutdown.exe gibt aber mit Shell ist das doch wesentlich einfach
@Red
Aber dann wird doch nicht geprüft ob es die Zeit ist, wie es vom Benutzer eingestellt worden ist...
/edit, Wie soll ich denn den Zielwert hinschreiben, wieder mein langen Code den du Zitiert hast? -
P3KK3Y schrieb:
Aber dann wird doch nicht geprüft ob es die Zeit ist, wie es vom Benutzer eingestellt worden ist...
Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
-
VB.NET-Quellcode
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim Stunde As Integer = NumericUpDown1.Value
- Dim Minute As Integer = NumericUpDown2.Value
- Dim Sekunde As Integer = NumericUpDown3.Value
- Dim Jahr As Integer = My.Computer.Clock.LocalTime.Year
- Dim Monat As Integer = My.Computer.Clock.LocalTime.Month
- Dim Tag As Integer = My.Computer.Clock.LocalTime.Day
- 'Dim pr As New Process()
- Dim jetzt = DateTime.Now
- Dim Zielwert As DateTime = New DateTime(Jahr, Monat, Tag, Stunde, Minute, Sekunde)
- If jetzt >= Zielwert Then
- 'pr.StartInfo.FileName = TextBox1.Text
- 'pr.Kill()
- Process.GetProcessesByName(TextBox1.Text)(0).Kill()
- MsgBox("Prozess geschlossen", 64, "Erfolgreich!")
- If RadioButton1.Checked Then
- Shell("shutdown -s -f")
- End If
- If RadioButton2.Checked Then
- Shell("shutdown -r -f")
- End If
- If RadioButton4.Checked Then
- Shell("shutdown -l -f")
- End If
- End If
- End Sub
Das steht momentan alles dar, blos es passiert garnichts, wenn ich das Programm Teste -
-
P3KK3Y schrieb:
Ich hab auch davon gehört das es eine Shutdown.exe gibt aber mit Shell ist das doch wesentlich einfach
BackToTopic: Versuch mal deine Ursprüngliche Variante mit Stunden, Minuten, Sekunden mit Numericupdowns zu vergleichen aber statt "&" "and" zu verwenden.
Habs grad so ausprobiert:
-
Ahhh ich glaube ich hab nen ganz dumen Fehler, also es werden Prozesse in eine ListBox angezeigt:
VB.NET-Quellcode
- Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
- Dim Pc As System.Diagnostics.Process
- For Each Pc In System.Diagnostics.Process.GetProcesses()
- ListBox1.Items.Add(Pc.ProcessName)
- Next
- If ListBox1.Items.Contains(Pc.ProcessName) Then
- Timer2.Stop()
- End If
- End Sub
So und nun habe ich den verdacht da ja nur wenn man auf den Prozess klickt in der Textbox nur der Name steht und nicht .exe steht
-> daran liegts doch oder? -
-
-
Ähnliche Themen
-
m97y97 - - Sonstige Problemstellungen
-
oliver14800 - - Sonstige Problemstellungen
-
5 Benutzer haben hier geschrieben
- Gast (18)
- RodFromGermany (10)
- BjöNi (6)
- Myrax (3)
- SeriTools (1)