我的MScomm串口通訊收發進方式.

我的MScomm串口通訊收發進方式. 接收OK.
但是發送時候就不對了. 比如:
發送數据             接收數据
00                       30
09                       39
a                        61
A                        41
1A                       31
2A                       32
AA                       41
我發現一個規則:
1:就是每次發送區不管是多長. 一次只能發送第一位.
2: 發送的是ASCII碼. 能否發送22時候也自動轉換為ASCII的" . 單片机接收就是22了.
好像有個函數轉換.以下是我的發送代碼:
Dim i%, buf$
Dim s3(1 To 1) As Byte
Select Case Index
Case 0
   buf = Trim(Text1.text)
   outbyte = StrConv(buf, vbFromUnicode)   ';是否可以更改轉換??????????? 
   buf = Form1.MSComm1.Input
   Form1.MSComm1.Output = outbyte