VB6 MSComm1_OnComm 問題，懂的請進

程式如下：
Private Sub Command1_Click()
Dim Buf As Byte
Buf = &HAA

Text1 = ""
MSComm1.Output = Chr(Buf)
Text1 = "Send Data = AA"
End Sub
-------------------------------------------------------------------------------

Private Sub Form_Load()

If (MSComm1.PortOpen = True) Then MSComm1.PortOpen = False

MSComm1.CommPort = 4
MSComm1.Settings = "9600,N,8,1"
MSComm1.InputMode = comInputModeBinary

If (MSComm1.PortOpen = False) Then MSComm1.PortOpen = True

Text1 = ""
End Sub

照理應該發送1 byte data 0xAA
但是用示波器觀看確是一串數據，有懂的人可以解答嗎？
VB6初學感謝您！