Trích:
Nguyên văn bởi tuongdtd
anh cho em hỏi thêm, khi đó trên máy tính ta sẽ nhận được mã ASCII của ký tự, sau đó ta lại chuyển mã ASCII thành ký tự tương ướng phai ko ah?
khi đó em dùng VB viết chương trình nhận trên máy tính:
dim x,y as string
Private Sub MSComm1_OnComm()
If (MSComm1.CommEvent = comEvReceive) Then
x = MSComm1.Input 'doc du lieu cong com
khi đó x là mã ASCII của 5 ký tự nhận từ VDK phải ko ah?
sau đó em tách lấy ký tự thứ nhất bằng lệnh
y= mid(x,1,1)
vậy thì "y" của em sẽ nhận được mã ASCII của ký tự thứ nhất phai ko ah?
nhưng "y" nhận được các chữ cái khác không phải các ký tự "0123456789ABCDEF"
anh chỉ cho em thuật toán nhân trên máy tính nhé!
|
Bạn thử dụng hàm asc(x) xem sao.
Ví dụ, dưới vdk bạn gởi: U1TXREG=0x41 chẳng hạn
trên VB: x = MSComm1.Input, thì lúc đó x là ký tự 'A'
y=asc(x); y = 65 (=0x41).