亚洲国产日韩中文字幕,久久久精品人妻一区二区三区四 ,无码精品人妻一区二区三区漫画

自在自线亚洲а∨天堂在线-中文字幕一区视频播放-扒开双腿猛进入喷水高潮叫声-欧美日本亚洲一区二区-老熟妇高潮偷拍一区二区-国产精品高清一区二区不卡-午夜色福利视频一区二区三区-亚洲国产成人精品福利在线观看-亚洲欧美成人一区二区在线电影

S7-200 自由口通訊程序（方式B）

TITLE=// S7-200以自由口通訊方式向個(gè)人計(jì)算機(jī)不斷地發(fā)送 S7-200 6個(gè)ASCII碼 //

Network 1 // 網(wǎng)絡(luò)標(biāo)題

// 網(wǎng)絡(luò)注釋

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 '開始計(jì)時(shí)

Timer1.Interval = 1000