【原创】对比VBA,Python一行代码搞定txt读取

 

 

 

 

 

pandas 1行代码搞定

 

 

看下VBA,原文链接:https://blog.csdn.net/weixin_42578747/article/details/90111536

  Private Sub txt_read()
           Dim txt As String
            Open "D:\test.txt" For Input As #1 '
            '对文件做任何 I/O 操作之前都必须先打开文件。Open 语句分配一个缓冲区供文件进行 I/O 之用,
            '并决定缓冲区所使用的访问方式。
            '打开文件作为数据输入用,文件号为#1
            Do While Not EOF(1)
                Line Input #1, txt  '从已打开的顺序文件中读出一行并将它分配给 String 变量
                'Line Input # 语句一次只从文件中读出一个字符,直到遇到回车符 (Chr(13))
                '或回车–换行符 (Chr(13) + Chr(10)) 为止。回车–换行符将被跳过,而不会被附加到字符串上
                MsgBox txt
            Loop
            Close #1
    End Sub

----------------------
1、Open 语句
打开方式有
Input:以读取方式打开。
Output:以写入方式打开。
Append:以追加方式,即添加内容到文件末尾打开。
Binary:以二进制方式打开。
Random:以随机方式打开,如果未指定方式,则以 Random 方式打开文件。
Open pathname For mode As [#]filenumber
Open "c:\a.txt" For Output As #1
filenumber 是一个有效的文件号,范围在 1 到 511 之间。
如果 pathname 指定的文件不存在,那么,在用 Append、Binary、Output、或 Random 方式打开文件时,可以建立这一文件。
2、Close 语句
语法:Close [filenumberlist]
filenumberlist 参数为一个或多个文件号,若省略 filenumberlist,则将关闭 Open 语句打开的所有活动文件。
说明:打开文件后,必须在使用完后关闭文件。

3、EOF 函数
语法:EOF(filenumber)
功能:返回一个 Integer,它包含 Boolean 值 True,表明已经到达为 Random 或顺序 Input 打开的文件的结尾。
Open "c:\a.txt" For Input As #1 ‘以读入方式打开c:\a.txt
Do While Not EOF(1) '未到达结尾
Line Input #1, s1 '读入一行,放入s1变量中
Loop
Close #1
---------------------------------------

 

看完上面的代码,VBA和Python,你会怎样选择

 

posted @ 2021-11-23 10:22  HuaBro  阅读(394)  评论(0编辑  收藏  举报