2011-08-11 1 views
2

ここに私のコードです。ファイルabc.csvが存在し、データがいっぱいです。Visual Basic 6.では、.csvファイルの内容を文字列にダンプしたいのですが、私のコードで何が問題になっていますか?

Dim strContent As String 
    Dim int As Integer  

    Open "C:\abc.csv" For Input As #int 

     strContent = Input(LOF(int), int) 

    Close #int 

エラーは、ファイルが存在しないかのように進行しますが、C:\ドライブディレクトリに存在するということです。私はそれをさらに確かめた。 C:\ abc.csvはそこにあります....私は何が欠けていますか?

答えて

5

int = FreeFile 
Open "C:\abc.csv" For Input As #int 
+0

それでした!私はFreeFileにintを割り当てなかった。ジェームスを捕まえて感謝します。 – phan

2

が、私はこれをでテストするためのVB6環境を持っていないしてください、私はあなたがこのようにそれを試してみたいと思う:下(

Dim strContent As String 
Dim int As Integer  
int = FreeFile 
Open "C:\abc.csv" For Input As #int 
strContent = Input(LOF(int), #int) '<-- make sure to put the # on the 2nd param 
Close #int 

の詳細はこちらを参照してください。 Classic VBでのOpenメソッドの使用):
http://www.vbknowledgebase.com/?Id=23&Desc=Read-Text-File-into-string-VB6

関連する問題