樓主：我怎么運行寫入后，原有的數值變為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的值就會變成你輸入的值了

好的謝謝樓主，樓主周末也在呀，太好了，這就開始搞。

樓主你好，出現了如圖的問題，我那兒沒做對呀。

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