エクセルファイルのバイナリ読み込み

解決

初心者ひで 2005-04-07 01:28:56 No: 89257

はじめまして。
VB6.0でエクセルファイルのバイナリ読み込みを行いたいのですが、
読込先がNULL状態になってしまいます。
何がいけないのでしょうか？ご教授願います。

Dim wBuff() As Byte
Dim intFNO As Long
Dim wFileName As String

    wFileName = "C:\Microsoft Excel ワークシート.xls"
    intFNO = FreeFile
    '入力ファイルのオープン
    Open wFileName For Binary Access Read As #intFNO
    Get #intFNO, , wBuff
    Close #intFNO

ガッ 2005-04-07 01:45:59 No: 89258

何をしたいのかは訊きませんが、とりあえず、"wBuff()"が未初期化ですね。

初心者ひで 2005-04-07 01:58:20 No: 89259

wBuff()初期化することで読み込むことができました！
単純なことだったのですね。。。
ガッさん、ありがとうございます。