Hallo, ich habe mir eine Funktion gemacht die für ein program eine nachricht ausgeben soll, das funktioniert auch nur wird die zeit nicht angezeit.
Mein Prinzip: Die funktion wird aufgerufen mit einem typ dem text und noch zusätzlichen args. Am anfang gucke ich, If (object.name = "time") Then, dann soll er vor den übergebenen text die zeit hängen also: text = time & text
Jetzt zu meinem Code: Also alle 3 If bedingungen treffen ein.
Wenn ich in der (name = "time") bedingung den Wert von mes ausgeben lasse ist er mit der zeit davor, wenn ich ihn aber direkt danach ausgeben lasse ist er ohne zeit davor? Wieso? Bitte helft mir ich weiß nicht wonach ich googeln soll Es klappt einfach nicht
Grüße Niklas
Riesen dummer Denkfehler -.- Wie lösche ich das Thema wieder?
Mein Prinzip: Die funktion wird aufgerufen mit einem typ dem text und noch zusätzlichen args. Am anfang gucke ich, If (object.name = "time") Then, dann soll er vor den übergebenen text die zeit hängen also: text = time & text
Jetzt zu meinem Code: Also alle 3 If bedingungen treffen ein.
Wenn ich in der (name = "time") bedingung den Wert von mes ausgeben lasse ist er mit der zeit davor, wenn ich ihn aber direkt danach ausgeben lasse ist er ohne zeit davor? Wieso? Bitte helft mir ich weiß nicht wonach ich googeln soll Es klappt einfach nicht
VB.NET-Quellcode
- Private Sub showNotification(m As String, type As String, args() As String)
- dim mes as string = m
- If (type = "Request") Then
- mes = mes & args(0)
- End If
- For i As Integer = 0 To lstSettings.Count - 1
- If ((lstSettings(i).group = type) And (lstSettings(i).name = "Time") And (lstSettings(i).state)) Then
- mes = "[" & getUhrZeit().ToString & "] " & mes
- 'MsgBox(mes) Erste Ausgabe (Mit Zeit)
- End If
- 'MsgBox(mes) Zweite Ausgabe (Ohne Zeit!?!?!)
- If ((lstSettings(i).group = type) And (lstSettings(i).name = "Chat") And (lstSettings(i).state)) Then
- RichTextBoxChat.AppendText(mes & vbNewLine)
- End If
- If ((lstSettings(i).group = type) And (lstSettings(i).name = "MsgBox") And (lstSettings(i).state)) Then
- MsgBox(mes)
- End If
- Next
- End Sub
Grüße Niklas
Riesen dummer Denkfehler -.- Wie lösche ich das Thema wieder?
Dieser Beitrag wurde bereits 4 mal editiert, zuletzt von „Freestyler100“ ()