Private Sub tmchat_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tmchat.Tick Dim cmdreadchat As New MySqlCommand("SELECT chat FROM tb_chat", Conn) Dim chatreader As MySqlDataReader chatreader = cmdreadchat.ExecuteReader While chatreader.Read() If Not chatreader(0).ToString = ChatBoxBackup.Text Then ChatBoxBackup.Text = chatreader(0).ToString End If End While chatreader.Close() End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)