• 【原创】对比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,你会怎样选择

    ------------------------------- ********厚德达理,励志勤工******** -------------------------------
  • 相关阅读:
    [Js-JDBC]事务
    [Js-JDBC]SQL注入及解决,Statement与PreparedStatement
    [Js-Java SE]IO+Properties配置文件
    [Js-Java SE]可变长参数
    [Js-Java SE]线程同步(加锁)(synchronized,守护进程,死锁,计时器)
    [Js-MySQL]函数
    [Js-MySQL]运算符优先级
    2015年3月30日
    Maven知识点一览
    记一次MySQL(5.7版本)数据库的主从同步和备份
  • 原文地址:https://www.cnblogs.com/hightech/p/15591981.html
Copyright © 2020-2023  润新知