樓主：我怎么運行寫(xiě)入后，原有的數值變?yōu)?了。

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

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

那要如何指定數值呢？

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

樓主，麻煩你再辛苦一下了，做個(gè)示例了，還是做不出來(lái)，呵呵太笨了。

樓主好：T值、C值要如何讀取呢？

T、C值好像沒(méi)提供直讀的功能。

哦，明白了，謝謝樓主。
還有樓主幫忙做個(gè)寫(xiě)D值的示例了。

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

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

好的謝謝樓主，樓主周末也在呀，太好了，這就開(kāi)始搞。

樓主你好，出現了如圖的問(wèn)題，我那兒沒(méi)做對呀。

把你的程式傳上來(lái)，我幫你看看。