ADボードの動作検証（その２）

メーカーからはサポート外で、かつ、恐らく使用可能と思われるけど「不明」です・・と突き放されましたが、

ACX-PACのアナログコントロール、AcquireDataEXは以下のコードにしたら動きました。

格納変数をObjectにし、かつ=Nothing としないと書かないとデータが取れません。

Dim Ret As Short
Dim Buffer(32) As Object　　　　　　 ‘Object型

Ret = AxAcxAio2.ChannelString = “0”

Buffer = Nothing                                         ‘これ必須（理由は不明・・）

Ret = AxAcxAio2.AcquireDataEx(Buffer)