اضع هذا الكود في تايمر لاظهار الكلام المستقبل من قاعدة البيانات في textbox3 ;
Me.TextBox3.Text = Me.TextBox3.Text & Chr(13) & Chr(10) & user21 & " : " & s1a.Tables(0).Rows(0)(0)
TextBox3.SelectionStart = TextBox3.TextLength - 1
TextBox3.ScrollToCaret()
واضع هذا الكود في زر الارسال لظهار الكلام المرسل الى قاعدة البيانات في textbox3
If TextBox3.Text <> "" Then
TextBox3.Text = TextBox3.Text & Chr(13) & Chr(10) & username & " : " & TextBox1.Text
TextBox3.SelectionStart = TextBox3.TextLength - 1
TextBox3.ScrollToCaret()
Else
TextBox3.Text = username & " : " & TextBox1.Text
End If
وبالتالي يكون لدي كلامين
1- كلام مستقبل
2-كلام مرسل
والاثنان يظهران في textbox3
واريد كل كلام بلون منهم بلون مختلف
