TCP 통신 프로그램 에서요
서버메세지를 보내는데
서버메세지: ㅇㅇㅇㅇ
이런식으로 하려고 하는데요,
밑에 엔터키 사용하는건 "서버메세지: ㄱㄴㄷㄹ"
이렇게 정상출력이 되는데
위에 버튼 눌러서 사용하는건 "서버메세지: ㄱㄴㄷㄹ (다음줄) 서버메세지: " 이렇게 표시됩니다. ㅠㅠ
▲ 엔터키는 정상 출력
▲ 버튼은 두줄 출력...ㅠㅠ
Private Sub btn1_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles btn1.Click, btn1.Click
If Not myStream Is Nothing And Not myWrite Is Nothing Then
myWrite.WriteLine("서버메세지: " + Me.txtM.Text)
myWrite.Flush()
End If
Me.txtM.Text = ""
Me.txtM.Focus()
End Sub
Private Sub txtM_KeyDown(sender As Object, e As KeyEventArgs) Handles txtM.KeyDown
If e.KeyCode = Keys.Enter Then
If Not myStream Is Nothing And Not myWrite Is Nothing Then
myWrite.WriteLine("서버메세지: " + Me.txtM.Text)
myWrite.Flush()
End If
Me.txtM.Text = ""
End If
End Sub
어떻게 하면 좋을까요 ㅠㅠ
조언좀 부탁드립니다.
아, 저기 그리고
서버 연결되면
Private Sub ServerStart()
MessageView("서버가 실행 되었습니다.")
While (Start)
Try
SerClient = Server.AcceptTcpClient()
MessageView("서버에 연결 되었습니다." + vbCrLf + "(" + Now() + ")")
myStream = SerClient.GetStream()
myWrite = New StreamWriter(myStream)
Catch
Return
End Try
End While
End Sub
이렇게
서버에 메세지뷰 뜨게 했는데요,
서버 연결 종료하면 똑같이 뜨게 하고싶은데
캐치 밑에 MessageView("서버 연결 종료") 라고 했더니 안 뜹니다..ㅠㅠ
어떻게 하면 연결 종료가 출력되게 할 수 있을까요? 이것도 좀 부탁드릴게요 ㅠㅠ
구글링을 해봐도 종료에 대한건 안 나오길래요 ㅠㅠ