楼主：我怎么运行写入后，原有的数值变为0了。

I(0)=0
WriteDeviceRandom("D0", CLng(1), I(0))
這樣D0的值就會變成0了。

想改變D0的值，要指定數值給它。

那要如何指定数值呢？

指定i(0)的數值即可。

楼主，麻烦你再辛苦一下了，做个示例了，还是做不出来，呵呵太笨了。

楼主好：T值、C值要如何读取呢？

T、C值好像沒提供直讀的功能。

哦，明白了，谢谢楼主。
还有楼主帮忙做个写D值的示例了。

不是有提供方法了嗎？
I(0)=0
WriteDeviceRandom("D0", CLng(1), I(0))
這樣D0的值就會變成0了

要寫入任意值，可以在畫面加入一個TEXTBOX控制項，把它的值指定給I(0)即可。
I(0)=CINT(TEXTBOX1.TEXT)
WriteDeviceRandom("D0", CLng(1), I(0))
這樣D0的值就會變成你輸入的值了

好的谢谢楼主，楼主周末也在呀，太好了，这就开始搞。

楼主你好，出现了如图的问题，我那儿没做对呀。

把你的程式傳上來，我幫你看看。