Dobrý deň , natrafil som na ,pre mňa velký "otáznik" a to ten ,že pri použití kódu :
Public Function SendMessage_WebService(ByVal chatter As String, ByVal message As String) As String
Dim messageMask As String = "{0} @ {1} : {2}"
message = String.Format(messageMask, chatter, DateTime.Now.ToString, message)
m_messages.Add(message)
ws_messages.Text = ws_messages.Text + Environment.NewLine + message
Return message
End Function
Na riadku :
ws_messages.Text = ws_messages.Text + Environment.NewLine + message
S použitím Environment.NewLine sa nepridá nový riadok. Skúšal som to s použitím :
Private ws_messages As TextBox = New TextBox
ale aj :
Private ws_messages As String
Riadok sa nechce pridať a neviem prečo :/ . Skúšal som aj vbNewLine , ale nič nepomohlo. Viete mi niekto poradiť ? PS: kód sa nachádza v Class (Chat.vb)
|