请输入专案类型(网站专案或者应用程式专案)：
VB2010 Express
各位先进好，
小弟想将ASCII的值传到SerialPort(COM1)，
目的在于传16data到SerialPort，进而控制连接在SerialPort的装置，
资料总共7个Byte。
而此SerialPort连接的程式可以直接看到ASCII转16进制的值，
我的写法如下：
SerialPort1.Close()
SerialPort1.BaudRate = 19200
port = 1
SerialPort1.PortName = "COM" & port
SerialPort1.Open()
SerialPort1.Write(Chr(128))
问题就出在128开始！
在127前，可以很完整的显示每个ASCII对照的16进制值，
但128开始显示的16进制值却开始出现问题（数值不对或显示00），
造成资料错误
网络上找到方式，是将chr内的值以byte方式传送，于是我写成：
Dim A As Byte
A = 128
.
.
.
SerialPort1.Write(Chr(A))
依然无法解决
请问这要用什么方式解决呢？
或者有更好的方式可以传值给SerialPort吗？
还请各位先进给予指导，非常感谢！