all of the sudden...

[james14]

This wouldnt work in my code:

Private Sub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs)
       
        If (Asc(e.KeyChar)) = 13 Then
            txtchatwin.Text = txtchatwin.Text & vbCrLf & (username) & ":" & " " & chattext.Text
            chattext.Clear()
        End If
    End Sub

i would keep on pressing enter with nothing happening, it used to work and it has no build errors when i run it. whats the matter with it?

Thanks

[joeframbach]

is (username) supposed to be in quotes?

[james14]

no, thanks but it didnt solve my problem

[RealNickyDude]

What exactly is "(username)"? Is it a variable?

[james14]

i made username the name that you used to log in, i declared it as a string

[Pirate]

upload the proj ...

[james14]

what do you mean by that... ?

[Pirate]

send sample of your proj files?

[james14]

my proj isnt really anything yer, theres just a txtbox and another one thats slightly bigger than the other one for chat text. and i already posted the code to that...
im not quite sure what you mean pirate..

[kerv21]

James...

Is txtchatwin.Text set to multi-line = true ?

I see you are using a CRLF.

[james14]

yes it is set to multiline=true

[DNA7433]

im sure this has been solved by the other post thats a "continuation" but anyways, theres no handles text1.KeyPress or something like that on the end of the function declaration

[RealNickyDude]

Try this james:

Private Sub txtuserinput_KeyPress(ByVal sender As Object, ByVal e As _
        System.Windows.Forms.KeyPressEventArgs) Handles txtUserInput.KeyPress
 
        If Asc(e.KeyChar()) = 13 Then
            txtChatWindow.Text = txtChatWindow.Text & vbCrLf & Username & ":  " & txtUserInput.Text
            txtUserInput.Clear()
        End If
    End Sub

Thanks go to Pirate for most of the help on this one.

[james14]

Ok thanks ill test it out when i get on my other comp