求助大虾！以下是一段VB写的代码，功能是：读报警状态！
求助大虾！以下是一段VB写的代码，功能是：读报警状态！图片如下！
问题来了：
1、我对VB一点都不懂，请各位大虾首先帮我解释以下代码，最好每行都注释了
2、此断代码，可以在我们的PB里面调用么？如果能，请问怎么调用呢？
Private Sub Command3_Click()
ReDim outvalue(4)
outvalue(0) = &H5A&
outvalue(1) = &H3&
outvalue(2) = &H31&
outvalue(3) = &HAA&
outvalue(4) = (&H5A& + &H3& + &H31& + &HAA&) Mod 256
MSComm1.Output = outvalue
MSComm1.InBufferCount = 0
MSComm1.RThreshold = 6
Option3.Value = True
End Sub
明日继续加分，呵呵。。。
[解决办法]
感觉帖子应该发在API调用里面，希望有朋友能帮帮我，在线等回复。。感谢ING..............
