东京热无码人妻系列综合网站_国产精品性色一区二区三区_网站大全免费网站_又爽又黄无遮拦成人网站_黄色影院免费观看_奇米影视在线观看

beiye1234
級別: 略有小成
精華主題: 0
發帖數量: 255 個
工控威望: 282 點
下載積分: 914 分
在線時間: 250(小時)
注冊時間: 2010-02-05
最后登錄: 2017-07-31
查看beiye1234的 主題 / 回貼
樓主  發表于: 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重新編輯 ]

主站蜘蛛池模板: 哪里有毛片网站 | 国产一二三区在线观看 | 久久久亚洲精品一区二区三区 | 国产91精品看黄网站在线观看 | 97pao国产成视频永久免费 | 国产高清美女一级a毛片 | 毛笔玩弄高潮h | 成人a级免费视频 | 精品亚洲一区二区三区在线观看 | 久久综合精品国产一区二区三区 | 蜜臀色欲AV无码国产精品 | 中国美女黄色大片 | 亚洲一级特黄毛片 | 大象视频成人看免费网站 | 亚洲52av| 老鸭窝a天堂av国产 国产免费a∨片在线观看不卡 | 野花韩国高清免费神马 | 最新中文无码字字幕在线 | 国产成人精品一区二三区在线观看 | 日韩色婷婷 | 国产涩涩视频在线观看 | 久久久久久夜精品精品免费啦 | 成人九一免费视频 | 国产的精品一区二区在线观看 | 国产成人综合欧美午夜不卡 | 国内成人自拍视频 | 国产精品高潮呻吟久久av免费动漫 | 久久午夜福利免费无码 | 国产一级视频免费播放 | 无码人妻一区二区三区在线 | 国产的精品一区二区在线观看 | "国产精品视频一区二区三区 " | 国产精品久一 | 亚洲3区在线| 女上位av片在线观看免费 | 国产精品99久久久久久久久久久久 | 免费a级人成a大片在线观看 | 91色免费视频 | 一级一片a | 精品人妻少妇一区二区三区不卡 | 久草黄色 |