如何从串行口读出大于128的字符，用二进制形式？另外数据的转换问题：char->byte?

Control传Binary Data 
以下是读取Binary Data Dim Buffer As Variant 
Dim Arr() As Byte ' 设定并开启连接埠 
MSComm1.CommPort = 1 
' 连线速度 9600 baud、无同位检查、资料位元 8、停止位元 1 
MSComm1.Settings = "9600,N,8,1" 
告诉控制项当使用 Input 时，读取整个暂存区 
MSComm1.InputLen = 0 MSComm1.PortOpen = True 
' 设定 InputMode 以读取二进位资料 
MSComm1.InputMode = comInputModeBinary 
' 等待直到输入暂存区有 10 个位元组 
Do Until MSComm1.InBufferCount < 10 
    DoEvents 
Loop 
' 往暂存区存二进位资料 
Buffer = MSComm1.Input 
' 指定给位元组阵列以便处理 
Arr = Buffer 
MSComm1.PortOpen = False 
而送出Binary的资料则没有像InputMode的属性，在VB5.0中 
Output属性是接Varant所以直接将ByteArray传送出去就好了， 
所以重点变成如何将想传的资料放入ByteArray Dim Buffer(5) Buffer(0) = 210 
Buffer(1) = 150 
Buffer(2) = 68 
Buffer(3) = 56 MSComm1.Output = Buffer