三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重新編輯 ]

免费观看久久精品日本视频| 好大好粗好紧好想射视频| 极品萌白酱在线播放黄片| 看AⅤ免费毛片手机播放| 唔嗯啊白浆视频| 久久大香蕉精品在线观看| 亚洲日韩AV无码一本到| 中国妇被黑人XXX猛交| 中文字幕在线一区二区不卡| 波多野中文字幕| 大鸡巴操的我真舒服视频| 插入骚逼99p| 亚洲欧美日韩在线专区精品| 性刺激久久久久久久久游戏| 大陆精大陆国产国语精品| 日韩a级毛片一区二三区| 日本精品在线观| 国产调教性奴在线观看w| 久久久99婷婷久久久久| 国产美女人喷水在线观看| 透烂美女出水嫩逼嗷嗷叫| 日本五十六十老熟妇乱m| 亚洲区另类春色综合小说| 操小逼逼大鸡操| 老女人日穴视频| 少妇露脸12p| 免费看成人a片无码视频| 日韩欧美群交P内射捆绑| 日本中文字幕免费在线视频| 国产日韩精品免费二三氏| 挺进绝色邻居的紧窄小肉| 五月花精品视频在线观看| 激情五月天网| 欧美一区二区三区不卡免费| 男生打几把插进女生逼里| 成人区精品一区二区不卡| 国产爱豆剧果冻传媒在线| 国产精品第1页桃色av| 黄色网站操逼的| 男人肉女人骚逼| 国产在线色视频|