ファイルのオープン

VisualBasic6.0で以下のようにa.iniを読み込みます。
次に、もう一度a.iniを読み込む必要があり、ファイルを開くと、「ファイルが読めません」
のエラーメッセージになってしまうのですが、何が悪くてどうしたらよいのでしょうか？

filNo = FreeFile
Open　"a.ini" ForInput As #fileNo
Do Until EOF(filieNo)
Input #fileNo,bf1,bf2
StepLength(count)=CInt(bf1)
StepRot(coujnt) = CInt(bf2)
count = count +1
if count>=200 Then
Exit Do
End If
Loop
Close #fileNo

No.2 回答者： davidfox 回答日時： 2018/09/11 17:49

単純にして調べていくのが常套ですが、サンプル↓を加工して見るのも手でしょう。

http://www016.upp.so-net.ne.jp/garger-studio/gam …

この回答へのお礼

ありがとうございました。フルパスで指定したら解決しました。

お礼日時：2018/09/18 12:58

No.1 回答者： tatsu99 回答日時： 2018/09/11 17:10

fileNoのスペルミスかと。

誤：filNo = FreeFile
^^^
正：fileNo

誤：Do Until EOF(filieNo)
　　　　　　　　^^^^^^
正：fileNo

この回答へのお礼

ありがとうございます。
結構間違えてますね。失礼いたしました。

しかし、スペルミスは、質問の際のものです。

スタンドアロン端末のため、質問するPCに手書きでうつしました。

お礼日時：2018/09/11 17:32