急求！短信息发送程序有关问题

急求！短信息发送程序问题！
我把PDU编好了，MSComm也初始化了。打开串口，清空了缓冲区。
发送按扭编的是：Private Sub send_Click()
   
  code = "089168" & code2 & "11000D9168" & code3 & "000800" & leng & code1
  MSComm1.Output = "AT+CMGF=0" + vbCr

  MSComm1.Output = "AT+CMGS=" & str(15 + length) + vbCr

  MSComm1.Output = code & Chr$(26)
  End Sub
我不知道还缺什么，哪位高人帮帮忙啊。急着用，谢谢。

------解决方案--------------------
你的短信猫是什么？
------解决方案--------------------
code2
code3
code1
leng
4个变量都赋值了吗?
------解决方案--------------------
tc35停产了吧？！