最新天堂中文在线丨午夜嘿嘿嘿影院丨亚洲国产精品高清久久久丨中文字幕人成乱码熟女app丨www91亚洲丨97成人资源丨成人中文字幕+乱码+中文字幕丨一区二区三区在线 | 日丨日韩免费大片丨亚洲欧美一区二区三区丨国产在线观看a丨亚洲成人第一区丨国内免费视频成人精品丨亚洲综合色网站丨午夜精品美女久久久久av福利丨国产午夜人做人免费视频网站丨国产又黄视频丨97se狼狼狼狼狼亚洲网丨狠狠亚洲婷婷综合色香五月丨中国一级毛片黄丨国产女人十八毛片丨国产色视频在线播放丨国产亚洲精久久久久久无码苍井空丨天天摸日日摸爽爽狠狠丨久久综合香蕉国产蜜臀av

多謝樓主的指點幫助了

修改如下：
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時，沒有成功，要做那些設置嗎？

改PLC CPU的代碼，底下是FX系列的。
我原先都是用FX0N在模擬的，你把actcputype改一下就可以了。
不同的型號，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是什么意思呀