ycf1234123
级别: 略有小成
精华主题: 0
发帖数量: 52 个
工控威望: 375 点
下载积分: 1826 分
在线时间: 82(小时)
注册时间: 2010-04-22
最后登录: 2018-05-22
查看ycf1234123的 主题 / 回贴
楼主  发表于: 2013-11-01 10:29
全看 | 小 中 大
图片：
Private Sub Command1_Click()      '写入
Dim RatCoda1 As Long
Dim SandData As Integer
SendData1 = taxt1
RetCodml = ActFXCPU1.WriteDeviceBlock("d0", SendData1)
End Sub
xiejun8103
三人行,必有我师
级别: 工控侠客
精华主题: 0
发帖数量: 327 个
工控威望: 2118 点
下载积分: 3244 分
在线时间: 299(小时)
注册时间: 2009-10-26
最后登录: 2019-07-02
查看xiejun8103的 主题 / 回贴
1楼  发表于: 2013-11-01 14:31
全看 | 小 中 大
只一个按钮的看不见不出问题。可能是出在别的地方吧