[ Black One @ 28.07.2011. 09:02 ] @
Pozz. Pravim chat program i sada sam napravio novu formu koja se zove frmPrivateChat i u njoj imam smješten lblsender di se sprema username od osobe koja šalje poruku..... evo kod Code: Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Dim prozor As New frmPrivateChat prozor.lblSender.Text = nickname prozor.Show() End Sub e sada kako da nađem koji je chat odgovara kojem korisniku chata... pokušao sam s ovim kodom ali neradi, Code: Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click For Each chat In Application.OpenForms Try If chat.lblSender.Text = nickname Then chat.TextBox1.Text = poruka End If Catch ex As Exception End Try Next End Sub možete li mi pomoći? |