[求助]我的程序错在哪？

Dim var As Variant
Dim str As String
Select Case MSComm1.CommEvent
Case comEvReceive
   bufcount = MSComm1.InBufferCount
 var = MSComm1.Input
End Select
 str = var
 Print str
为什么输出是：  0000000000000
                       000 03

为什么str字符串被分成了两部分，一会str为 00000000000，一会为000 03？