我想将 .csv 文件的内容转储到 Visual Basic 6 中的字符串中。我的代码有什么问题吗?

发布于 11-28 22:59 字数 314 浏览 0 评论 0原文

这是我的代码。文件 abc.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 在那里......我错过了什么?

Here is my code. The file abc.csv exists and is full of data.

    Dim strContent As String
    Dim int As Integer      

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

        strContent = Input(LOF(int), int)

    Close #int

The error that I get is that the code proceeds as if the file never existed...but it does exist in the C:\ drive directory. I made extra sure of it. C:\abc.csv is there....What am I missing?

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(2

要走干脆点2024-12-05 22:59:06

尝试

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

Try

int = FreeFile
Open "C:\abc.csv" For Input As #int 
放我走吧2024-12-05 22:59:06

我没有 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

请参阅此处了解更多信息(在经典 VB 中使用 Open 方法下):
http://www.vbknowledgebase.com/ ?Id=23&DES=读取文本文件到字符串-VB6

I don't have a VB6 environment to test this in, but I think you want to try it like this:

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

See here for more info (under Using the Open method in Classic VB):
http://www.vbknowledgebase.com/?Id=23&Desc=Read-Text-File-into-string-VB6

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文