Set Comm = CreateObject("MSCOMMLIB.MSCOMM")If Comm.PortOpen = False Then Comm.CommPort = 1                                 
Comm.Settings = "57600,n,8,1"                  
Comm.InputLen = 0                                        
Comm.PortOpen = True
Else
msgbox "Port is already opened!"&vbCRLF
End IfComm.Output = "+++"  '发送+++命令Do
Buffer = Buffer&Comm.Input
Loop Until Instr(Buffer,"OK" & vbCRLF)
现在发送第二条命令,怎么删除buffer中的发送第一条命令获取的数据