複数のUSBデバイスを認識するには？ (ID:142641)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 そのライブラリを使った事が無いので、憶測でしか答えられませんが： > dev = FindUSB(index) 引数の index には、どのような値を指定していますか? 提示のページを見る限りでは、 index = 0 Do dev = FindUSB(index) If dev <> "" Then Debug.Print dev '実際には、配列なりコレクションなりに蓄える Else Exit Do End If Loop のようにして列挙できるような気がします。