Visual Basic zobrazení zprávy odesílateli
Napsal: 14 úno 2012 16:48
Zdravím, udělal jsem si jednoduchý chat, vše zatím funguje. Jen mám problém, že když odešlu zprávu, tak se sice odešle tomu komu chci, ale mě se nezobrazí. Já bych chtěl nějak udělat aby když odešlu zprávu tak se ukáže jak kamarádovi (to už mám) tak i mě.
Čast scriptu:
Button1 je tlačítko pro odeslat.
RichTextBox1 je políčko pro zobrazení zprávy.
RichTextBox2 je políčko pro vložení zprávy.
Prezdivka je přezdívka, kterou si nastavíte při spuštění chatu.
Díky
Čast scriptu:
Kód: Vybrat vše
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
client = New TcpClient(TextBox1.Text, 55555)
Dim writer As New StreamWriter(client.GetStream())
writer.Write("[" & TimeString & "] " & My.Settings.Prezdivka & " : " & RichTextBox2.Text)
writer.Flush()
RichTextBox2.Clear()
Button1 je tlačítko pro odeslat.
RichTextBox1 je políčko pro zobrazení zprávy.
RichTextBox2 je políčko pro vložení zprávy.
Prezdivka je přezdívka, kterou si nastavíte při spuštění chatu.
Díky