S7-200 自由口通訊程序（方式B）
TITLE=// S7-200以自由口通訊方式向個人計算機不斷地發(fā)送 S7-200 6個ASCII碼 //
Network 1 // 網絡標題
// 網絡注釋
LD SM0.1
MOVB 16#09, SMB30
MOVW 16#5337, VW100
MOVW 16#2D32, VW102
MOVW 16#3030, VW104
MOVB 6, VB99
Network 2
LD SM0.5
EU
XMT VB99, 0
/////////////////////////
VB源程序
Dim x1
Dim yTemp() As Byte
Dim stemp As bbbbbb
Dim i As Integer
Private Sub About_Click()
frmAbout.Show
End Sub
Private Sub Check1_Click()
For i = LBound(yTemp) To UBound(yTemp)
stemp = stemp + Hex(yTemp(i)) + c h *r(32)
Next i
Text1.Text = Text1.Text + stemp
End Sub
Private Sub Command1_Click()
MSComm1.PortOpen = True '打開串口
Timer1.Enabled = True '開始計時
Timer1.Interval = 1000
點右鍵下載：
S7-200 自由口通訊程序 方式B.rar
本文標簽：S7-200 自由口通訊程序（方式B）
* 由于無法獲得聯系方式等原因，本網使用的文字及圖片的作品報酬未能及時支付，在此深表歉意，請《S7-200 自由口通訊程序（方式B）》相關權利人與機電之家網取得聯系。
：鞏經理
：13915946763
：南京塞姆泵業(yè)有限公司
