![]() |
|
Tài trợ cho PIC Vietnam |
Giao tiếp cổng COM và LPT RS232, RS485 và LPT là những giao tiếp cơ bản và kinh điển khi mới học về vi điều khiển... |
|
Ðiều Chỉnh | Xếp Bài |
![]() |
#5 |
Đệ tử 3 túi
|
Đã giải quyết xong
Thank anh tdm, nhưng em dùng VB 6.0 và cũng sửa được lỗi rồi
sửa lại đoạn code VB sau: Code:
Private Sub MSComm1_OnComm() Dim InputText As String If Me.MSComm1.CommEvent = comEvReceive Then InputText = MSComm1.Input If InputText = Chr(10) Then 'neu la ky tu \n txtOutput.Text = txtOutput.Text & vbNewLine 'thi xuong hang End If txtOutput.Text = txtOutput.Text + InputText txtOutput.SelStart = Len(txtOutput.Text) End If End Sub thay đổi nội dung bởi: caremlanh, 23-08-2011 lúc 02:47 PM. |
![]() |
![]() |
Ðiều Chỉnh | |
Xếp Bài | |
|
|