シリアル デバイス (COM ポート) から読み取るために、古い QBasic プログラムを Visual Basic 6 に移行しようとしています。
私はこのコードを使用します (この元のコードは VB6 でも機能するはずです):
RESET
OPEN "COM1:2400,E,7,2,CS,DS,CD" FOR RANDOM AS #1
PRINT #1, "SND1"
LINE INPUT #1, P$
これは QBasic では正常に動作します ('SND1' を送信するとデバイスからのデータが得られます) が、VB6 ではPRINT-command: 'Bad file mode' (エラー 54) でエラーが発生します。
-commandsに変更FOR RANDOMすると動作しますがFOR OUTPUT、-command は同じエラーを返します (もちろん)。PRINTLINE INPUT
アップデート：
「モード」の唯一のオプション ( http://msdn.microsoft.com/en-us/library/aa266177(v=vs.60).aspxを参照) は、追加、バイナリ、入力、出力、またはランダムです。