我把我的VB程序和PLC程序写道这里，请朋友们指点

VB程序——Command1的作用：发送1(ASC码49），结束发送是回车符（ASC码10)

'*************************

Option Explicit

Dim SendByte(1 To 1) As Byte



Private Sub Command1_Click()

SendByte(1) = Asc(1)

MSComm1.Output = SendByte

SendByte(1) = 65

MSComm1.Output = SendByte



End Sub



Private Sub Form_Load()

MSComm1.PortOpen = True



End Sub



----------------------------------------------

PLC程序：

初始化子程序sub0

LD SM0.1

MOVB 16#09, SMB30

MOVB 16#B0, SMB87

MOVB 16#0A, SMB89

MOVB 250, SMB94

ATCH INT_0, 23

ENI

RCV VB100, 0



中断程序——INT_0

LDB= SMB86, 16#20

NOT

RCV VB100, 0