97久久精品人人爽人人爽蜜臀/www.青草视频/成视频年人黄网站视频福利/国产第一页第二页/国产裸拍裸体视频在线观看/国产又色又爽又高潮免费/精品超清无码视频在线观看/久久精品蜜芽亚洲国产av/辽宁熟女高潮狂叫视频/你懂在线/欧美少妇15p/人妖 丝袜 另类 亚洲/日韩欧美网站/少妇人妻大乳在线视频/婷婷色国产/性色av无码久久一区二区三区/亚洲精品图片一区15p/亚洲一卡2卡3卡4卡5卡精品

多謝樓主的指點幫助了

修改如下：
Private Sub Command1_Click()
  Dim i(0) As Long
  i(0) = CLng(Text1.Text)
  gf = PLC.WriteDeviceBlock("D0", CLng(1), i(0))
End Sub

太好了樓主，謝謝你，可以寫入了。

樓主你好，我在控制FX3UPLC時，沒有成功，要做那些設(shè)置嗎？

改PLC CPU的代碼，底下是FX系列的。
我原先都是用FX0N在模擬的，你把a(bǔ)ctcputype改一下就可以了。
不同的型號，actcputype代碼都不同。
如下

''' FXCPU
Global Const CPU_FX0CPU = &H201                                         ' FX0/FX0S
Global Const CPU_FX0NCPU = &H202                                        ' FX0N
Global Const CPU_FX1CPU = &H203                                         ' FX1
Global Const CPU_FX2CPU = &H204                                         ' FX2/FX2C
Global Const CPU_FX2NCPU = &H205                                        ' FX2N/FX2NC
Global Const CPU_FX1SCPU = &H206                                        ' FX1S
Global Const CPU_FX1NCPU = &H207                                        ' FX1N
Global Const CPU_FX3UCCPU = &H208                                       ' FX3U/FX3UC
Global Const CPU_FX3GCPU = &H209                                        ' FX3GCPU

謝謝樓主，我再試試。

樓主你好，謝謝你的幫助。

最近有沒有更新   

什麼更新？

樓主 您 看到 此貼  加我 QQ 好嗎？？？ 我 問題要 請教！  13030299

GPPW+LLT+MX+VB6+電腦一臺  請問樓主,MX是什么意思呀