精华内容
下载资源
问答
  • 1了解结构化程序设计的基本概念 2掌握 程序设计中的常用语句 3掌握顺序选择和循环结构及相应的语句;教学内容;4.1 算法及程序设计基础;1算法的概念;18;[算法描述];3算法的特征;4算法的描述 ;5.基本算法结构;2选择结构...
  • VB - 数据文件(一)顺序文件

    万次阅读 2011-11-03 22:36:24
    1. 打开文件(Open) Open 文件名 [For模式][Access 存取类型][锁定]As [#]文件号[Len=记录长度]  说明: (1)文件名; (2) 模式用于指定文件访问的方式,包括:  Append——从文件末尾添加 Binary——二进制...

    1. 打开文件(Open)

    Open 文件名 [For模式][Access 存取类型][锁定]As [#]文件号[Len=记录长度]

           说明:

    (1)文件名;

    (2) 模式用于指定文件访问的方式,包括:
               Append——从文件末尾添加             Binary——二进制文件
               Input——顺序输入(输入给自己,从txt中取出)                            Output——顺序输出(输出到txt中)
               Random——随机存取方式

    (3)文件号(或称文件缓冲区)

    (4)存取类型:访问文件的类型,为Read(只读)、Write(只写)、Read Write(读写)

    (5)锁定:限制其他用户或其他进程对文件进行读写操作

                           Shared(共享)、LockRead(禁止读)、Lock Write(禁止写)、

                              Lock Read Write(禁止读写)

    (6)Len:用来指定每个记录的长度(字节数)

          示例:    Open"d:\cj1.dat" For  Output As  #1

    2. 关闭文件(Close)

             打开的文件使用完后必须关闭。

             关闭文件的语句格式:
               Close[#] 文件号1[,[#] 文件号2…] ]

             示例:

               Close#1

     1. Write语句 
       格式:Write#文件号 [,表达式表]
        功能:将表达式的值写到与文件号相关的顺序文件中
        每个Write语句向顺序文件写入一个记录(不定长),它会自动地用逗号分开每个表达式的值。给字符串加上双引号

             在最后一个字符写入后,插入一个回车换行符(Chr(13) + Chr(10)),以此作为记录结束的标记。

             示例:Write#1, "Good Afternoon", 1998


    Private Sub CommandButton1_Click()
        Dim num As String * 6, name As String * 8, score As Integer
        num = TextBox1.Text
        name = TextBox2.Text
        score = Val(TextBox3.Text)
        Write #1, num, name, score
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox3.Text = ""
        TextBox1.SetFocus
    End Sub
    
    Private Sub CommandButton2_Click()
        Close #1
        End
    End Sub
    
    Private Sub UserForm_Initialize()
        Open ThisWorkbook.Path & "\1.txt" For Output As #1
    End Sub
    
    运行结果~

    读取数据,用For...Next 语句

    Sub 的开发商的()
        Dim n As String, m As String, s As Integer
        Open ThisWorkbook.Path & "\1.txt" For Input As #1
        For i = 1 To 5
            Input #1, n, m, s
            Cells(i, 1) = n
            Cells(i, 2) = m
            Cells(i, 3) = s
        Next
        Close #1
    End Sub

     2. Print语句 

    格式:Print  #文件号[,表达式表]
            作用与Write一样。将一个或多个表达式的值写到与文件号相关的顺序文件中。其输出数据格式与Print方法在窗体上输出格式相似。

               示例:
                Print  #1, num, name, score              ‘对应按区格式
                Print  #1, num;name;score          ‘对应紧凑格式


    先用Input方式打开文件,然后采用Input或LineInput语句从文件中读出数据。通常,Input用来读出Write写入的记录内容,而Line Input用来读出Print写入的记录内容

    1.Input语句 
        一般格式:Input#文件号,变量名表
          功能:从指定文件中读出一个记录。变量个数和类型应该与要读取的记录所存储的数据一致。
           打开文件时,文件指针指向文件中的第1个记录,以后每读取一个记录,指针就向前推进一次。如果要重新从文件的开头读数据,则先关闭文件后打开

    距离:

    Sub sj()
        Open ThisWorkbook.Path & "\data1.txt" For Output As #1
        a = 123: b$ = "ABCD"    '在同一行赋值,用“:”
        Write #1, a, b$
        Close #1
        Open ThisWorkbook.Path & "\data1.txt" For Input As #1
        Input #1, c, d$
        Close #1
        Debug.Print c, d$
    End Sub


    Sub dfjslkdf()
        Open ThisWorkbook.Path & "\num2.txt" For Append As #1
        For i = 51 To 200
            If i Mod 7 = 0 Then Write #1, i
        Next
        Close #1
    End Sub
    
    Sub dfhdfdffdfdfdk()
        k = 0
        Open ThisWorkbook.Path & "\num2.txt" For Input As #1
        Do While Not EOF(1)
            Input #1, x
            Debug.Print x,
            k = k + 1
            If k Mod 4 = 0 Then Debug.Print
        Loop
    End Sub

    Debug.Print i    一行一行的输出

    Debug.Print i,    在一行输出,中间空很多的空格,具有一定的格式

    Debug.Print i;    在一行输出,中间空很少的空格,具有一定的格式

    可以加入If i Mod 2 = 0 Then Debug.Print    可以进行换行


    Print也有相似的用法:

    从TXT中读取数据,数据中间可以是空格、半角逗号

    Sub dhfkd()
        k = 0
        Dim arr(1 To 1100) As Variant
        Open ThisWorkbook.Path & "\num2.txt" For Input As #1
        Do While Not EOF(1)        'EOF(1)用来判断#1是否读到头了,到头返回TRUE
            Input #1, x           '读取一个数据
            k = k + 1
            arr(k) = x            '将读取的数据存在一个数组中
        Loop
        k = 0
        For i = 1 To 10
            For j = 1 To 110
                k = k + 1
                Cells(j, i) = arr(k)
            Next
        Next
        Close #1
    End Sub

    2.Line Input语句 

    格式:LineInput  #文件号,字符型变量
    功能:从打开的顺序文件中读出一个记录,即一行信息  

    用Line input来读取由Print写入的数据,Line Input读取一整行的数据~

    Sub djhfdljf()
        Open ThisWorkbook.Path & "\mytxt.txt" For Output As #1
        a = 123: b$ = "SBCD"
        Print #1, a, b$
        Print #1, a; b$
        Close #1
        Open ThisWorkbook.Path & "\mytxt.txt" For Input As #1
        Line Input #1, x$
        Debug.Print x$
        Line Input #1, x$
        Debug.Print x$
        Close #1
    End Sub


    3.Input函数           

    格式:Input(字符数,#文件号)
        功能:从文件中读取指定字符数的字符
        示例:A$=Input(20, #1)
            顺序文件的缺点是不能快速地存取所需的数据,也不容易进行数据的插入、删除和修改等工作,因此对于经常要修改数据或取出文件中个别数据,均不适合使用,但对于数据变化不大,每次使用时又需要从头往后顺序地进行读写,它还是不失为一种好的文件结构

    展开全文
  • 顺序文件的写入(Write、Print):顺序文件存放的内容有两类:数据类型:每条记录的数据项固定 各数据项之间逗号分隔,字符串有双引号 每条记录以回车符结束文本类型:如写的文章、程序代码等每条记录可长可短,以...
    顺序文件的写入(Write、Print): 顺序文件存放的内容有两类: 数据类型:
    • 每条记录的数据项固定
    • 各数据项之间逗号分隔,字符串有双引号
    • 每条记录以回车符结束
    文本类型:
    • 如写的文章、程序代码等
    • 每条记录可长可短,以回车符结束
    示例:     "091023","王海涛",66     (Write循环写)     nihao,wo xian zai zai hai bian (Prite一次写) 语法形式:
      Write 文件号,[数据],[数据]  Print 文件号,[数据],[数据]
    说明: Write :  数据项之间逗号分隔,字符串用双引号括起来 Prite : 无逗号分隔,双引号,按区分隔(每14个字符宽)
    读文件(Input、Line Input): Input语句: (常用于数据类型的顺序文件) 作用: 从打开的顺序文件读出数据项并将数据赋值给变量 形式: Input #文件号,变量列表 关键: 搞清楚读出的数据是什么类型?变量类型需一致 例:
    Private Sub Command1_Click()    Dim no$,name$,score$    Open "" For Input As #1    Do While Not EOF(1)    Input #1,no,name,score    print no,name,score      Loop      End Sub
    Line Input语句: (常用于文本类型的顺序文件) 作用: 从打开的顺序文件读出一行数据并将数据赋给变量(读出的是字符串类型,不包含回车换行符) 形式: Line Input #文件号,字符串变量 例: 将当前工程的窗体文件读出并在窗体显示
    Open App.Path+"\form1.frm" For Input As #1  Do While Not EOF(1)    '每读一行后,指针自动向下移动一行。    Line Input #1,str    print strLoop
    补充知识:
    • EOF(文件号):函数表示#1号文件中指针是否到末尾。没有为False,否则为True

    • LOF(文件号):返回文件的字节数(英文1B,中文2B)

    • LOF()、Len()、LenB()的区别:例如s="VB6.0程序设计教程"

    • LOF(s)=17获得文件字节数17

    • Len(s)=11字符数11

    • LenB(s)=22字节数22

    实例操作

    步骤一: 按照下图,建立窗体界面

    89d9f30e2ab21bc0497e587978d990f0.png

    步骤二: 保存工程,并在工程所在文件目录下新建两个txt文本,分别命名为:Data1和Data2。如下所示:

    5d212838b46149f83cd9149b842bc7e0.png

    步骤三: 编写第一个按钮的代码(Write写入数据文件),该按钮演示了使用Write方法写入数据到文件的过程。
    Private Sub Command1_Click()    Open App.Path & "\Data1.txt" For Append As #1    Write #1, "091023", "王海涛", 66    Write #1, "092498", "周  英", 88    Close #1End Sub
    步骤四: 编写第二个按钮的代码(Print写入数据文件),该按钮演示了使用Print方法写入数据到文件的过程。
    Private Sub Command2_Click()    Open App.Path & "\Data2.txt" For Append As #2    Print #2, "091023", "王海涛", 66    Print #2, "092498", "周  英", 88    Close #2End Sub
    步骤五: 编写第三个按钮的代码(Input读出数据文件),该按钮演示了使用Input方法读取数据文件的过程。
    Private Sub Command3_Click()    Dim no$, name$, score$    Open App.Path & "\Data1.txt" For Input As #1    Do While Not EOF(1)        Input #1, no, name, score        Print no, name, score    Loop    Close #1End Sub
    步骤六: 编写第四个按钮的代码(Line Input读出form1.frm文本文件),该按钮演示了Line Input方法读取当前窗体form1.frm文件内容的过程。
    Private Sub Command5_Click()    Dim str$    Open App.Path + "\form1.frm" For Input As #2    Do While Not EOF(2)        Line Input #2, str        Print str    Loop    Close #2End Sub
    步骤七: 编写第五个按钮的代码(LOF返回文本字节数),按按钮演示了利用LOF方法显示某文本包含的字节数
    Private Sub Command6_Click()    Open App.Path & "\Data1.txt" For Input As #1    Print "Data1该文件包含字节数为:"; LOF(1)    Close #1End Sub
    步骤八: 编写最后一个按钮的代码,清空窗体
    Private Sub Command4_Click()    ClsEnd Sub
    最后, 运行程序,测试代码,先点击写入数据的按钮,然后再点击读取按钮,查看效果。并在资源管理器中打开Txt文件,查看里面的内容。如下图所示,是经过多次写入数据后再查看数据的效果:

    95a54947cdd41ac80041759958160b90.png

    21ad904c9333434dfd325e6279cf5b62.png

    展开全文
  • 记得以前使用vb6.0的时候,对文本文件的操作挺麻烦的,特别是在写文件的时候,需要区分什么顺序文件、随机文件,很教材都专门针对文本文件的读写开辟了一个章节来讲解,够麻烦的了。现在使用.net读写文本文件,因为...

    作者: ll_efort 发布时间:2008-08-11 09:00:24 来源: 网络
    工作需要,小编需要使用vb.net对文本文件进行读写操作。编程需要完成如下工作:
    1、把程序执行错误追加到错误日志中
    2、使巧巧读书网的编辑能够读取错误日志
    记得以前使用vb6.0的时候,对文本文件的操作挺麻烦的,特别是在写文件的时候,需要区分什么顺序文件、随机文件,很教材都专门针对文本文件的读写开辟了一个章节来讲解,够麻烦的了。现在使用.net读写文本文件,因为时间仓促,没来得及细看MSDN,同时受到6.0的思路影响,把问题复杂化了,在追加记录到文本文件尾部的时候就写不下去了,后来仔细看了一下MSDN中例子,问题终于得到了解决。
    好了下面进入正题,分别把VB.NET中对文本文件进行读和写的通用操作做个示例,免得后来新手多走弯路。
    我们这里是对文件流进行操作,所以模块前面要加上:
    Imports System.IO
    1、写操作:
    使用System.IO的StreamWriter,下面是代码:
    Dim strFilePath As String = SaveFileDialog1.FileName
    Dim sw As StreamWriter = New StreamWriter(strFilePath, True)'true是指以追加的方式打开指定文件

    For i = 0 To j
        temp = i.ToString
        sw.WriteLine(temp)
        sw.Flush()
    Next
    sw.Close()
    sw = Nothing
    

    首先要说明的是构造函数new
    Public Sub New(path, append, Encoding)
    path:要打开文件的完整路径,如果文件不存在则自动建立一个新的文件。
    append:缺省值为false,指示是否以追加方式打开指定文件。false–如果存在path指定的文件,则覆盖原文件,否则建立一个新文件;true—如果存在path指定的文件,则打开该文件,以追加数据的方式在文尾写数据,否则建立一个新文件。
    Encoding:缺省值为System.Text.Encoding.Default,即使用系统缺省的编码,指示以什么样的编码写文件。
    WriterLine(str):在文本中添加一个新行,同时在行尾加上回车换行符
    2、读操作

    Dim line As String
    Dim sr As StreamReader = New StreamReader(strPath, System.Text.Encoding.Default)
    Do While sr.Peek() > 0
         line = sr.ReadLine()
    Loop
    sr.Close()
    sr = Nothing
    

    构造函数new

    Public Sub New(Path, Encoding)
    

    path:要打开文件的完整路径,如果文件抛出一个错误。
    Encoding:缺省值为System.Text.Encoding.Default,即使用系统缺省的编码,指示以什么样的编码读文件。
    到这里就把VB.NET里对文本文件的读写操作示例讲解完了,其实.net中对文件的读vb.net教程写还有其它的办法,这里讲的只是最实用的办法,其它的有待读者进一步研究!

    展开全文
  • vb文件打开文件的关闭

    千次阅读 2014-10-13 10:00:09
    打开数据文件(首次操作为建立数据文件并且打开) 进行读写操作 关闭数据文件   1、文件打开 格式: Open 文件名 For 方式 [Access 存取类型] [lock] As [#]文件号 [Len=记录长度] 文件名:...

    数据文件的操作按以下步骤进行:

    打开数据文件(首次操作为建立数据文件并且打开)

    进行读写操作

    关闭数据文件

     

    1、文件的打开

    格式:

    Open 文件名 For 方式 [Access 存取类型] [lock] As [#]文件号 [Len=记录长度]

    文件名:数据文件的名字,该文件名可能还包括目录、文件夹及驱动器。

    方式:指定文件方式,有 Append、Binary、Input、Output、或 Random 方式。如果未指定方式,则以 Random 访问方式打开文件。

    Append:顺序输出(写入数据文件)

    Binary:二进制方式(读写)

    Input:顺序输入(读出数据)

    Output:顺序输出(写入数据文件)

    Random:随机(读写)

    存取类型:说明打开的文件可以进行的操作,有 Read(读)、Write(写)、或 Read Write(读写) 操作。

    Read(读):只读文件

    Write(写):只写文件

    Read Write(读写):读写文件,在随机文件和二进制文件和Append方式下有效。

    Lock:说明限定于其它进程打开的文件的操作。有 Shared、Lock Read、Lock Write、和 Lock Read Write 操作。

    Lodk Shared:所有进程都可以对此数据文件进行读写操作。

    Lock Read:不允许其他进程进行读操作。

    Lock Write:不允许其他进程进行写操作。

    Lock Read Write:不允许其他进程进行读写操作。

    文件号:一个有效的文件号,范围在 1 到 511 之间。

    记录长度:对于用随机访问方式打开的文件,该值就是记录长度。对于顺序文件,该值就是缓冲字符数。

    功能:

    打开指定的文件。

    如果指定的文件不存在,在用 Append、Binary、Output、或 Random 方式打开文件时,可以建立这一文件。

    如果文件已由其它进程打开,而且不允许指定的访问类型,则 Open 操作失败,而且会有错误发生。

    如果方式是 Binary 方式,则 Len 子句会被忽略掉。

    注意:在 Binary、Input 和 Random 方式下可以用不同的文件号打开同一文件,而不必先将该文件关闭。在 Append 和 Output 方式下,如果要用不同的文件号打开同一文件,则必须在打开文件之前先关闭该文件。

    举例:

    Open "d:\student.txt" For Output As #1

    Open "d:\txl.txt" For Append   As #2

    Open "d:\address.txt" For Input Read  As #3

    Open "d:\cj.txt" For Random  As #4 len=40

     

    2、文件关闭

    格式:

    Close [[#]文件号][,[#]文件号][,[#]文件号][,[#]文件号]......

    文件号:打开文件时指定的文件号。

    功能:

    关闭指定的文件号连接的文件。如果不指定文件号将关闭所有打开的数据文件。

    关闭的操作主要是将缓冲区中的数据写入文件中,并且取消文件号与文件的关联。

    除了Close外,当程序运行结束时,也会关闭所有的数据文件。

    举例:

    Close #1

    Close #2,#3

     

    本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/qinson/archive/2004/10/09/128860.aspx

    展开全文
  • (一)打开和关闭文件 1、顺序文件 打开顺序文件,我们可以使用Open语句。它的格式如下: Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize] 说明: (1)参数pathname 表示要打开
  • vb顺序文件操作

    2012-06-09 17:58:48
    打开顺序文件  open “路径” For Input Access Read As #1  (说明:For Append文件末尾添加数据 For Input 顺序读取文件的数据For Output向文件写入数据————这些是打开方式  Access Rea
  •  打开顺序文件,我们可以使用Open语句。它的格式如下: Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize]   说明:  (1)参数pathname 表示要...
  • VB操作文件实例

    千次阅读 2017-09-26 10:16:45
    文件操作分为两种方式,一种为顺序操作文件,...第一种:顺序文件 一、新建文本demo.txt文件并且写入数据 open "demo.txt" for output as #1 //新建文件并打开 print #1,"output a file" //写入数据到文件 close #1 //
  • 使用顺序文件 电脑硬盘上有成百上千的顺序文件。...顺序文件容易打开和操作,任何文本编辑器都可以。 技巧:什么是顺序文件顺序文件就是访问它里面的记录时必须按它占据的顺序进行的文件,这意味
  • vb6 读写文件

    2017-10-23 14:41:00
    1、顺序文件(文本文件) :以ASCII码形式存放的文件。似乎还有Unicode码存放的,有没有BCD码的呢? 2、随机访问文件:这种文件格式很有特点:文件中存放若干条等长的单元(也可以说是记录);每个单元包含同类型、...
  •  打开顺序文件,我们可以使用Open语句。它的格式如下: Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize]  说明:  (1)参数pathname 表示要打开的文件名,文件名可以...
  • VB 读取文件 VB6.0 实用FSO

    千次阅读 2015-04-24 19:19:51
    file1 = "c:\Myfile10001.txt"  Const ForReading = 1, ForWriting = 2...至于代码中用到的 Folder 对象的属性限于篇幅,就不详细介绍了,读者可参考VB文档中的相关内容。 (四)File对象和TextStream对象 ...
  • 认识VB的随机文件

    千次阅读 2017-01-21 20:18:46
    随机文件是VB的一种类似于数据库的一种文件格式,它和顺序文件的最大区别是随机文件是以数据块为存储单位的(顺序文件则是以行或字符为单位的),就像把一大块蛋糕分成相等的N块,然后可以任意取出其中的某块,这也...
  • 前言:我们在编程中会经常需要将采集到的数据或者设置的参数保存到文件,不同的编程语言对文件的操作大同小异,在此进行记录。
  • vb输入输出

    千次阅读 2016-06-29 10:45:50
    1. 打开文件(Open) Open 文件名 [For模式][Access 存取类型][锁定]As [#]文件号[Len=记录长度]  说明: (1)文件名; (2) 模式用于指定文件访问的方式,包括:  Append——从文件末尾添加 Binary——二进制...
  • VB文件读写

    2015-10-08 15:33:11
     打开顺序文件,我们可以使用Open语句。它的格式如下: Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize]  说明:  (1)参数pathname
  • 目录 一、文件结构和分类 1、文件概念 2、文件分类 (1)按文件功能分类 (2)按存储方式分类 ...(1)打开文件 ...二、顺序文件 ...3、向顺序文件写数据 (1)Write#语句 (2)Print#语句 4、从...
  • 之前我们已经给广大爱好者或程序员朋友们,...今天我们再出一套Microsoft Visual Studio 2005 -- VB.NET编程语言的教程与实例源代码。 微软的VB开发工具可谓是经典的产品啊,从90年代的QBasic开始,到最新的.Net开发...
  • 属性设置的方式是将项目的编译顺序指定到项目文件中的,这意味着如果使用命令行单独编译这个项目,也是能获得提前编译目标项目的效果的,而不需要打开对应的解决方案编译才可以获得改变编译顺序的效果。 不过使用...
  • vb使用open方法读写文件

    千次阅读 2008-07-03 14:32:00
    (一)打开和关闭文件 1、顺序文件 打开顺序文件,我们可以使用Open语句。它的格式如下:
  • vb文件操作函数

    2019-09-27 12:21:31
    1、Open 文件名 [For方式] [Access存取类型] [锁定] AS [#]文件号 [Len=记录长度] 功能:为文件的输入输出分配缓冲区,并确定缓冲区所使用的存取方式 说明: 1) 方式:指定文件的输入输出方式,可选,默认是Random...
  • VB操作EXCEL表的常用方法

    万次阅读 2019-01-07 17:39:12
    VB是常用的应用软件开发工具之一,由于VB的报表功能有限,而且一但报表格式发生变化,就得相应修改程序,给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。...
  • VB文件的读写操作

    2010-12-17 20:39:35
     文件类型:顺序文件、随机文件、二进制文件。  访问模式:计算机访问文件的方式,VB中有顺序、随机、二进制三种访问模式。 2. 顺序访问模式  顺序访问模式的规则最简单,指读出或写入时,从第一条记录“顺序...
  • 1、创建VB工程【顺序文件操作】 添加一个文本框和两个按钮,设置对象属性,如下图所示: 2、保存工程到考生文件夹D:\KSWJJ\26000001 3、编写【写文件】按钮单击事件处理代码 4、编写【读文件】按钮单击...
  • VB 动态数组,文件读写

    千次阅读 2016-04-06 16:05:20
    要将程序中的数据写到一个顺序文件,先打开文件以进行顺序输出或添加(注意此时的选用打开方式,选择Output则覆盖原来文件,选择Append则在原来文件后添加数据),可用下面的命令语句写入数据。 1、 Print # ...
  • VB6.0 文件操作语句

    2019-09-26 04:10:12
    能够对文件输入/输出 (I/O)。 语法 Open pathname For mode [Access access] [lock] As [#]filenumber [Len=reclength] Open 语句的语法具有以下几个部分: 部分 描述 pathname 必要。字符串表达式,...
  • VB.NET 教程_01_基础语法

    万次阅读 多人点赞 2018-08-08 00:48:58
    VB.Net是一种简单,现代,面向对象的计算机编程语言,由微软开发,将.NET Framework和公共语言运行库的强大功能与作为Visual Basic标志的生产力优势相结合。 Visual Basic .NET(VB.NET)是在.NET Framework上...
  • vb Script参考文档

    2009-07-28 22:13:02
    当这个主题打开后,再链接到其他相关的部分就简单多了。 好了,让我们试一试,体会体会!学习几个语句,研究几种方法,或者熟悉几个函数。你就能学会如何巧妙地运用 VBScript 语言,充分发挥 VBScript 语言的强大...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 10,055
精华内容 4,022
关键字:

vb顺序文件的打开