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

解決

初心者ひで  2005-04-06 16:28:56  No: 89257  IP: [192.*.*.*]

はじめまして。
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-06 16:45:59  No: 89258  IP: [192.*.*.*]

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

編集 削除
初心者ひで  2005-04-06 16:58:20  No: 89259  IP: [192.*.*.*]

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

編集 削除