请大神帮我看一下
buffer$ = ""MSComm1.Output = "@00FA0000000000101300C2C000001" + FCS("@00FA0000000000101300C2C000001") + "*" + Chr$(13) '读
Do
DoEvents
buffer$ = buffer$ & MSComm1.Input
Loop Until InStr(buffer$, "*")
If CInt(Mid(buffer$, 25, 1)) = 1 Then
Command2.Enabled = True
Else
Command2.Enabled = False
End If
在我的程序里插入这么一段程序，插入之后这段程序后面的所有命令都不能执行了。把这段程序改为注释，后面的命令可以执行
