三a级做爰片免费观看玉蒲团,伊人久久亚洲综合av影院,午夜永久免费爽爽爽影院,西川唯久久久久久久综合

beiye1234
級別: 略有小成
精華主題: 0
發(fā)帖數量: 255 個
工控威望: 282 點
下載積分: 914 分
在線時間: 250(小時)
注冊時間: 2010-02-05
最后登錄: 2017-07-31
查看beiye1234的 主題 / 回貼
樓主  發(fā)表于: 2011-04-15 20:36
請教各位關于VB6.0與S7-200以太網通訊(Winsock),本人剛接觸VB6.0。
要求:對Q0.3置1
VB6.0程序如下
Private Sub Command1_Click()

Dim sendstr(7) As Byte
sendstr(0) = &H1 '站地址
sendstr(1) = &H5 '功能碼
sendstr(2) = &H0
sendstr(3) = &H3 '目標地址
sendstr(4) = &HFF
sendstr(5) = &H0 '線圈置1
sendstr(6) = &H0 '校驗碼
sendstr(7) = &H0 '校驗碼
Dim astr As String
Dim i   As Integer
For i = 0 To 7
astr = astr & Chr(sendstr(i))
Next
SockServer.SendData astr

End Sub

Private Sub Form_Load()
SockServer.LocalPort = 2000    
SockServer.RemoteHost = "192.168.1.60" ‘PLC地址
SockServer.RemotePort = 1 ’PLC站地址
End Sub

用以太網鏈接測試,沒效果。

這個程序那個地方有問題?應該怎么改。
[ 此帖被beiye1234在2011-04-16 11:21重新編輯 ]

天堂1区2区3区在线观看| 国产hav视频| 国产三级在线视频播放线| 帅哥男女操网站| 肏东北美女少妇的屄电影| 大屁股美女掰开阴户日B| 久久久不久久久99精品| 风间由美一区二免费精品| 日韩一级片免费在线观看| 久草av给大家科普一下| 女同性黄网AAAAA片| 操美女蜜穴果冻| 男人的鸡吧扎女人的逼逼| 亚洲综合成人网在线观看| 国产剧情亚洲精品在线观看| 欧美精品av在线一区二区| 涩涩免费看片在线水好多| 人妻福利视频 | 欧美不卡在线一区二区三区| 大鸡吧狂插美女嫩逼视频| 亚洲欧美综合区丁香六月| 日本www视频| 国产精品美女一区二三区| 国产又黄又爽又刺激av| 亚洲精品国产一卡二卡三| 蜜臀av theporn| 熟女自慰30P| 冲喜娘子超甜哒 激情五月| 午夜男人草女人在线视频| 正在骚逼视频。| 成人网怡红院网| 成人性生交片无码免费看| 亚洲国99在线精品一区| 日本动漫精品v毛片大全| 久久久久久久久久久久最新| 久久久久久久久久精品亚洲| kk福利导航的最新地址| 裸条门福利合集| 亚洲午夜国产激情福利网站| 屄在线免费观看| 18禁久久久日韩网站人妻|