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
xuefenfeilxw
级别: 略有小成
精华主题: 0
发帖数量: 144 个
工控威望: 243 点
下载积分: 2097 分
在线时间: 439(小时)
注册时间: 2010-10-23
最后登录: 2022-07-28
查看xuefenfeilxw的 主题 / 回贴
1楼  发表于: 2013-11-01 10:55
少了写入数据的数量!
znz43
工控职业已成回忆 只因爱好常回家园 乐此不疲
级别: 工控侠客

精华主题: 0
发帖数量: 1057 个
工控威望: 4900 点
下载积分: 7351 分
在线时间: 2560(小时)
注册时间: 2010-06-24
最后登录: 2024-11-29
查看znz43的 主题 / 回贴
2楼  发表于: 2013-11-01 11:14
只给出一个子程序,你确定问题就出在此子程序而不在别处?
出门打工难,打工学艺难,学艺拜师难,找到好师傅更难。
赠人玫瑰,手留余香。舍得舍得,有舍才有得。
xiejun8103
三人行,必有我师
级别: 工控侠客
精华主题: 0
发帖数量: 327 个
工控威望: 2118 点
下载积分: 3244 分
在线时间: 299(小时)
注册时间: 2009-10-26
最后登录: 2019-07-02
查看xiejun8103的 主题 / 回贴
3楼  发表于: 2013-11-01 14:31
只一个按钮的看不见不出问题。可能是出在别的地方吧
zhangzhiming
级别: 略有小成
精华主题: 0
发帖数量: 24 个
工控威望: 208 点
下载积分: 1170 分
在线时间: 11(小时)
注册时间: 2013-05-15
最后登录: 2024-11-08
查看zhangzhiming的 主题 / 回贴
4楼  发表于: 2013-11-01 19:26
请问你这 taxt1是什么变量,数据有没有错误会不会有错误,ActFXCPU1.WriteDeviceBlock("d0", SendData1)是过程模块?这里你确定没有出错?没有完整的程序就只有一个单击事件谁有这么大的本事判断出来啊?