精华内容
下载资源
问答
  • VB顺序文件读写操作实例,本人亲自整理,适合初学者!
  • vb使用open方法读写文件vb使用open方法读写文件(一)打开和关闭文件1、顺序文件打开顺序文件,我们可以使用Open语句。它的格式如下:Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize]...

    vb使用open方法读写文件

    vb使用open方法读写文件

    (一)打开和关闭文件

    1、顺序文件

    打开顺序文件,我们可以使用Open语句。它的格式如下:

    Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize]

    说明:

    (1)参数pathname 表示要打开的文件名,文件名可以包含有驱动器和目录

    (2)Input Output

    和Append用于设置顺序文件的打开方式。其中,Input表示从打开的文件中读取数据。以这种方式打开文件时,文件必须存在,否则会产生错误。

    Output表示向打开的文件中写入数据。以这种方式打开文件时,文件中原有的数据将被覆盖,新的数据将从文件开始写入。如果文件不存在,则创建一个新文

    件。Append表示向打开的文件中添加数据。以这种方式打开时,文件中原有的数据将被保留,新的数据将从文件为开始添加。如果文件不存在,则创建一个新

    文件。

    (3)As[#]filenumber 子句用于为打开的文件指定文件号.对文件进行读写操作时,要用文件号表示该文件.文件号是介于1~511之间的整数,既可以是数字,又可以是变量.也可以省略不用.

    (4)当在文件与程序之间拷贝数据时,Len=buffersize子句指定缓冲区的字符数.

    例如:

    Open App.Path + "\test.dat" For Output As 1

    Open App.Path + "\test.dat" For Output As 1

    这两句代码在当前应用程序所在目录下创建了一个名为test.dat的文本文件,分配文件号为1.

    Open App.Path + "\test.dat" For Input As [#]filenumber

    这条语句是从文本文件中读取数据.

    Open App.Path + "\test.dat" For Append As [#]filenumber

    这条语句则是像文本文件中添加数据

    2、随机文件

    操作随机文件之前,首先必须定义用于保存数据项的记录类型.该记录是用户自定义数据类型,他们是随机文件中存储数据的基本结构.例如:

    Type Student

    No As Integer

    Name As String * 20

    age As Integer

    End Type

    Dim Stud As Student ‘定义一个可以存放学生材料的变量

    随机文件中,所有的数据都将保存到若干个结构为Student类型的记录中, 而从随机文件中读出的数据则可以存放到变量Stud中.

    之后我们就可以打开并读写文件了.下面是打开随机文件的语法格式:

    Open filename For Random as [#]filenumber Len = Reclengt

    相关文档:

    '创建快捷方式,兼容vista

    '要把vb6stkit.DLL放到程序目录

    '敖士伟 09-10-27

    '只对“桌面”和“开启”有效,其它还没做

    '=========开启外部同步程序定义开始

    Const SYNCHRONIZE = &H100000

    Const INFINITE = &HFFFF 'Wait forever

    Const WAIT_OBJECT_0 = 0 'The state of the spe ......

    把鼠标移到屏幕指定位置 如(111.111) 单击一下

    再移到屏幕另一指定位置指定位置 如(222.222)单击一下

    Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

    Private Declare Function SetCursorPo ......

    在VB中要想调用Excel,需要打开VB编程环境“工程”菜单中的“引用”项目,并选取项目中的“Microsoft Excel 11.0 object library”项。由于你的Excel版本不同,所以这个选项的版本号也是不同的。

    因为EXCEL是以层次结构组织对象的,其对象模型中含有许多不同的对象元素。

    &n ......

    ASP.Net中使用VB.Net调用存储过程并得到返回值

    来源:qqread论坛 作者: 出处:巧巧读书 2006-08-03 进入讨论组

    //存储过程代码

    CREATE PROCEDURE [AddNewInvoiceInfo] (@sUserID int,@sClaimMethod varchar(50),@sInvoiceNum  varchar(50),@sInvoiceDate datetime,@sBuyCity varchar(50))AS

    Insert Into SMB_In ......

    Put 语句

    将一个变量的数据写入磁盘文件中。

    Put [#]filenumber, [recnumber], varname

    Get 语句

    将一个已打开的磁盘文件读入一个变量之中。

    Get [#]filenumber, [recnumber], varname

    例如:

    dim B as byte

    open "File1.txt" for binary as #1

    get #1, 1, B

    close #1

    即可将File1.txt文件� ......

    展开全文
  • VB6.0 顺序文件写操作的操作演示,三种方法写数据,包括了完整的源码项目下载,是学习VB文件读写操作的好范例。  这三种方法是:  把文件的内容一次性的写入  把字符一个一个写入  依次写入顺序文件
  • 记得以前使用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文件读写

    2015-10-08 15:33:11
    vb使用open方法读写文件 (一)打开和关闭文件  1、顺序文件  打开顺序文件,我们可以使用Open语句。它的格式如下: Open pathname For [Input |Output |Append] As [#]filenumber [Len =...
    vb使用open方法读写文件
    (一)打开和关闭文件

      1、顺序文件

      打开顺序文件,我们可以使用Open语句。它的格式如下:

    Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize]

      说明:

      (1)参数pathname 表示要打开的文件名,文件名可以包含有驱动器和目录

      (2)Input Output 和Append用于设置顺序文件的打开方式。其中,Input表示从打开的文件中读取数据。以这种方式打开文件时,文件必须存在,否则会产生错误。Output表示向打开的文件中写入数据。以这种方式打开文件时,文件中原有的数据将被覆盖,新的数据将从文件开始写入。如果文件不存在,则创建一个新文件。Append表示向打开的文件中添加数据。以这种方式打开时,文件中原有的数据将被保留,新的数据将从文件为开始添加。如果文件不存在,则创建一个新文件。

      (3)As[#]filenumber 子句用于为打开的文件指定文件号.对文件进行读写操作时,要用文件号表示该文件.文件号是介于1~511之间的整数,既可以是数字,又可以是变量.也可以省略不用.

      (4)当在文件与程序之间拷贝数据时,Len=buffersize子句指定缓冲区的字符数.

      例如:

    Open App.Path + "/test.dat" For Output As 1

    Open App.Path + "/test.dat" For Output As 1

      这两句代码在当前应用程序所在目录下创建了一个名为test.dat的文本文件,分配文件号为1.

    Open App.Path + "/test.dat" For Input As [#]filenumber

      这条语句是从文本文件中读取数据.

    Open App.Path + "/test.dat" For Append As [#]filenumber

      这条语句则是像文本文件中添加数据

      2、随机文件

      操作随机文件之前,首先必须定义用于保存数据项的记录类型.该记录是用户自定义数据类型,他们是随机文件中存储数据的基本结构.例如:

    Type Student
     No As Integer
     Name As String * 20
     age As Integer
    End Type

    Dim Stud As Student ‘定义一个可以存放学生材料的变量

      随机文件中,所有的数据都将保存到若干个结构为Student类型的记录中, 而从随机文件中读出的数据则可以存放到变量Stud中.

      之后我们就可以打开并读写文件了.下面是打开随机文件的语法格式:

    Open filename For Random as [#]filenumber Len = Reclength

      说明:

      (1)参数filename 和filenumber 分别表示文件名或文件号.

      (2)关键字Random 表示打开的是随机文件

      (3)Len子句用于设置记录长度,长度由参数Reclength指定.Reclength的值必须大于0,而且必须与定义的记录结构的长度一致.计算记录长度的方法是将记录结构中每个元素的长度相加.例如前面声明的Student的长度应该是2+20+2=24字节.

      打开一个记录类型为Student 的随机文件的方法是:

    Open "c:/Student.txt " For Random As #1 Len = 25

      3、二进制文件

      打开二进制文件的语法格式如下:

    Open pathname For Binary As [#]filenumber

      说明:

      (1) 参数filename 和filenumber 分别表示文件名或文件号.

      (2)关键字Binary 表示打开的是二进制文件

      (3)对于二进制文件,不能指定字节长度.每个打开的二进制文件都有一个自己的指针,文件指针是一个数字值,指向下一次读写操作的文件中的位置.二进制文件中的每个”位置”对应一个数据字节,因此,有n个字节的文件,就有1到n个位置.

      我们可以用Seek()函数返回当前的文件指针位置(即下一个要读写的字节 );用Loc()函数返回上一次读写的字节位置,除非用Seek语句移动了指针,Loc()返回值总比Seek()的小1.我们来看下面的例子:

    Open “student.txt” for Binary as #1

      该语句用二进制的方式打开了student.txt文件.


     

      (二)读文件

      1、顺序文件

      顺序文件的读取有三种方式:

      (1)Line Input # 语句

      该语句从打开的顺序文件中读取一行数据。这里的一行指的是从当前指针位置开始到回车符或回车换行符之间的所有数据。Line Input # 语句的语法格式如下:

    Line Input # 文件号,变量号

      说明:“文件号”是打开文件时所用的文件号;“变量号”使用来存放读出数据的一个或多个变量,如果有多个变量,中间用空格分割开。Input# 语句为参数列表中的每一个变量读取文件的一个域,并将读出的域存入变量中。该语句只能顺序的从第一个域开始,直到读取想要的域。

      请看下面代码:

    Dim strLine As String

    Open "c:/vb/test.txt" For Input As #1

    Do Until EOF(1)
     Line Input #1, strLine
     text1.Text = text1.Text + strLine + Chr(13) + Chr(10)
    Loop

    Close #1

      此段代码逐行读取一个文件到文本框中。

      (2)Input函数

      此函数可以从顺序文件中一次读取指定长度的字符串。具体地说,就是从文件的当前位置开始,读取指定个数的字符,然后将他们返回。Input函数可以读取包括换行符,回车符,空格符等在内的各种字符。下面是它的语法格式:

      变量 = Input(串长度,文件号)

      例如,要从一个打开文件中读取12个字符并复制到变量file中,我们可以这样写:

    file = Input(12,filenum)

      如果要将整个文件复制到变量,请使用InputB函数将字节从文件复制到变量。由于InputB函数返回一个ASCII字符串,因此,必须用StrCopy函数将ASCII字符串转换为Unicode字符串。代码如下:

    file = StrCopy (Input (LOF(filenanum),filenum),vbUnicode)

      (3)Input # 语句

      Input #语句可以从文件中同时向多个变量内读入数据,而且读入的数据可以是不同类型的。
     
      下面使它的语法格式:

    Input # 文件号,变量列表

      例如,我们要在文件student.txt中写入数据,下面是代码:

    Open "student.txt" For Output As #filenum

    Write #filenum, "张三", "初一年级", 14
    Write #filenum, "李四", "职业高中", 18

    Dim name As String, nianji As String, age As Integer
    Dim name1 As String, nianji1 As String, age1 As Integer
    Open "student.txt" For Input As #filenum
    Input #filenum, name, nianji, age
    Input #filenum, name1, nianji1, age1
    Close #filenum

      执行结果:

    name=”张三” ,nianji = “初一年级” ,age =14

    name=”李四” ,nianji = “职业高中” ,age =18

      2、随机文件

      读取随机文件是可以使用Get # 语句,数据从文件的一个指定记录中读出后,存入一个用户自定义的变量中.

      语法格式: Get # FileNum ,[RecNum],UserType

      说明:

      (1)FileNum 是要打开的文件号;RecNum是要读取的记录号,若省略,则读取下一个记录

      (2)UserType 是一个用来存放读出数据的用户自定义的数据类型变量.

      下面是一个例子:

    Get # 1,5,Student

      该语句读取文件号为1的文件中的第5条记录.

      3、二进制文件

      读写二进制文件的方法和读写随机文件的方法基本相同,下面是相关的语句格式及其说明:

      格式: Get [#]fileNumber ,[Pos], Var

      功能: 用二进制方式,从文件的中指定的位置开始读取,所给变量长度的数据

      说明:

      (1)FileNumber是以二进制方式打开的文件号.

      (2)Pos用来指定读写操作发生时的字节位置,若省略,则使用当前文件指针位置.

      (3)Var是用来存放读出的数据的变量.该语句会自动根据var变量包含的字节长度读取适当的文件,如果Var是一个可变长度的字符串变量,则传送的字节数等于Var中目前的字节数.对于文件长度的判断我们可以使用Lof()函数,Eof()函数检查文件的结尾位置.

      下面的代码复制studert.txt文件到student1.txt文件中

    Dim ar As String * 1, i As Integer
    Open "c:/student.txt" For Binary As #1
    Open "c:/student2.txt" For Binary As #2
    For i = 1 To LOF(1)
     Get #1, , ar
     Put #2, , ar
    Next i

    Close #1, #2


     

      (三)写文件

      1、 顺序文件

      写顺序文件我们可以用Write # 和Print #语句向一个已经打开的文件中写入数据.

      下面是他们的格式和说明:

      Print # 的语法格式:

    Print # 文件号,变量列表

      例如,将文本框中的文本写到文件中,代码如下:

    Open "file.txt" For Output As #filenum

    Input #filenum, text1.text

      Write # 语句的语法格式:

    Write # 文件号,变量列表

      说明:用Write # 语句写入的信息便于以后用Input #语句来读取数据,因为Write #语句自动将写入到文件中的信息用逗号分开,并为字符串数据加上双引号.例如:

    Open "student.txt" For Output As #filenum

    Write #filenum, "张三", "初一年级", 14
    Write #filenum, "李四", "职业高中", 18

      2、 随机文件

      向随机文件中写入数据,使用Put #语句.语法格式如下:

    Put [#] FileNum ,[RecNum],UserType

      说明:

      (1) FileNum 是要打开的文件号;RecNum是要写入的记录号,若省略,则再上一次用Get 和Put语句所读写过的记录的后一条记录中写入,如果没有执行过Get 和Put语句,就从第一条记录开始

      (2)UserType 是包含要写入数据的用户自定义的数据类型变量.例如:我们向前面的student.txt文件中的第5个记录写入数据,可用这些语句:

    stud.No = 0301
    stud.Name = “王武”
    stud.Age =20
    Put #1 ,5,stud

      如果要插入的数据不只一两条的话,首先要确定文件和每条记录的长度,这样就可以计算出文件中究竟有多少条记录.我们可以用Lof()函数返回文件的长度,Len()函数返回每个记录的长度,计算文件中的记录个数可以用文件的长度除以给个记录的长度.示例如下:

    Nextrec= (Lof(1)/Len(UserType))+1

    Put #1,Nextrec,UserType

      3、二进制文件

      下面是以二进制方式写入文件的语句格式及其说明:

      格式:

    Put [#]fileNumber ,[Pos], Var

      功能: 用二进制方式,从文件的中指定的位置开始写入,所给变量长度的数据

      说明:

      (1)FileNumber是以二进制方式打开的文件号.

      (2)Pos用来指定写操作发生时的字节位置,若省略,则使用当前文件指针位置.

      (3)Var是用来存放写入的数据的变量.该语句会自动根据var变量包含的字节长度写入文件,如果Var是一个可变长度的字符串变量,则传送的字节数等于Var中目前的字节数
    展开全文
  • vb6 读写文件

    2017-10-23 14:41:00
    1、顺序文件(文本文件) :以ASCII码形式存放的文件。似乎还有Unicode码存放的,有没有BCD码的呢? 2、随机访问文件:这种文件格式很有特点:文件中存放若干条等长的单元(也可以说是记录);每个单元包含同类型、...
    '---------------------------------
    'write file
        Dim nHandle As Integer, fName As String
        fName = "d:\1.txt"
        nHandle = FreeFile
        Open fName For Output As #nHandle
        Print #nHandle, "0"
        Print #nHandle, "2"
        Close nHandle
    '----------------------------------
    'read file
        nHandle = FreeFile
        Open fName For Input As #nHandle
        cnt = 0
        Do Until EOF(nHandle)
            Line Input #nHandle, NewLine
            Debug.Print NewLine
        Loop
        Close nHandle

     

    ----------------------------------------------------------------

     

     

        总结一下VB6的文件操作,省得要用的时候又到处查找。

     

    一、文件类型

    1、顺序文件(文本文件) :以ASCII码形式存放的文件。似乎还有Unicode码存放的,有没有BCD码的呢?

    2、随机访问文件:这种文件格式很有特点:文件中存放若干条等长的单元(也可以说是记录);每个单元包含同类型、等数量、等长度的数据项;文件中,除了字符串以ASCII码存放之外, 其它都以二进制形式直接存放,节省存储空间。这种文件类型非常适合存储需要和软件交互的数据,如结构体数据、类数据等。这也是VB特有的文件访问方式。

    3、二进制文件:以二进制形式存放,PE程序文件一般都是这个类型。

    二、操作方法

    1、顺序文件

    打开: Open 文件名 For Input | Output | Append As [#]文件号   

             Input打开读入,文件不存在报错。Output打开覆盖写入,文件不存在则创建。Append打开追加写入,文件不存在则创建。  

    读: Line Input #文件号, 字符串变量

            读一行数据存入字符串变量,数据包括空格、Tab、等,不包括回车符和换行符,所以要显示文件的换行效果,要手动添加回车符和换行符(vbCrLf)

            Input #文件号, 变量1[, | ;] [变量2]...

            这种方式可以存入多个变量,而且变量类型不限于字符串型。

    写: Print #文件号, 参数1[, | ;] [参数2]...

            将各参数逐个写入文件。参数间用逗号隔开时,文件中相应插入多个空格;用分号隔开时,插入一个空格。可以用Spc(n)、Tab(n)等进行排版。

            Write #文件号, 参数1[, | ;] [参数2]...

            这种写入方式将自动添加界定符,对不同参数的类型加以界定。

    2、随机访问文件

    打开: Open 文件名 [For Random] As [#]文件号 Len = 记录长度

             For Random可以省略,文件不存在则创建,读写都是这种打开方式。   Len是文件中记录的一条长度,用以识别记录的开始与结束,经常用Len(记录名)来获取长度。

    读: Get [#]文件号, [记录号], 变量

            读一条记录存入变量,可以是系统类型的Integer、Single、String等等,也可以是自定义类型结构体、类等。记录号省略时从打开以后最后一次读取的末端开始读取记录。

    写: Put [#]文件号, [记录号], 表达式

            将表达式中的数据写入文件,表达式可以是各种变量的组合,中间用逗号隔开。该组数据写入记录号对应的位置,记录号省略时从打开以后最后一次写入的末端开始写入记录。

    3、二进制文件

    打开: Open 文件名 For Binary As [#]文件号

             文件不存在则创建,读写都是这种打开方式。当然也可以用来打开文本文件,读出来将不知所云

            读一条记录存入变量,可以是系统类型的Integer、Single、String等等,也可以是自定义类型结构体、类等。记录号省略时从打开以后最后一次读取的末端开始读取记录。

    读: Get [#]文件号, [读位置], 变量

             从“读位置”开始读取数据,读入的长度等于变量的长度,一次读一个。“读位置”以字节为单位。“读位置”省略时从打开以后最后一次写入的末端开始读入。

    写: Put [#]文件号, [写位置], 表达式

            将表达式中的数据写入文件,表达式可以是各种变量的组合,中间用逗号隔开。该组数据写入“写位置”,“写位置”以字节为单位。“写位置”省略时从打开以后最后一次写入的末端开始写入。

    三、操作权限

            使用Input、Binary、Random模式访问,可以同时对单个文件打开多个实例。使用Append和Output模式之前则必须确定文件

            Open 文件名 For 模式 [Access access] [lock ] As [#]文件号 [len = 记录长度]

            对随机存储文件和二进制文件,可以设置文件的读写权限。access可写成Read、Write、 Read Write,对应只读、只写、读写兼备。此项功能不适用于顺序文件。

             Lock | Unlock 文件号, [记录| [起始记录 To终止记录]]

            当指明lock标识后,可用以上代码设置文件的共享权限。对顺序文件, [记录| [起始记录 To终止记录]]不起作用,将对整个文件生效;对随机存储文件,将对记录标识中的部分进行权限锁定或解锁。

    四、文件操作函数

            以上部分可以实现文件操作的一些功能,但要完成如拷贝整个文件、查找文件是否已建立、取文件长度等功能,还需要一些文件操作函数来方便地实现。

    Seek: Seek(文件号)

            返回文件正在访问的位置,返回值为长整型。对顺序文件和二进制文件,返回值以字节为单位;对随机访问文件,返回值以记录号为单位。

    Seek: Seek [#]文件号,位置

            定位文件到指定位置。位置单位同上所述。

    Input: Input (字节数,[#]文件号)

            从文件的访问当前位置读入指定字节数的数据。仅适用于顺序文件和二进制文件。

    EOF: EOF(文件号)

            判断文件的访问位置是否在文件尾,如果是,返回True,否则,返回False。

    LOF: LOF(文件号)

            返回文件长度,单位为字节。

    FileLen: FileLen (文件名)

            返回文件名对应文件的长度,单位是字节。该函数取磁盘文件标识中的长度,即文件打开前的长度,可以取未打开的文件长度。

    GetAttr: GetAttr (Pathname)

            返回指定文件或文件夹的属性。

    FileAttr: FileAttr (文件号)

            返回文件号对应文件的打开方式。

    GetDateTime: GetDateTime (Pathname)

            返回文件被创建或修改的最后日期和时间。

    Free: FreeFile[(0|1)]

            返回未被占用的文件号,Free或Free(0)返回1~255之间未占用的文件号,Free(1)返回256~511之间未占用的文件。

    Dir: Dir (Pathname [,Attributes])

            测试指定路径是否有某文件,Attributes附加文件属性条件,取值vbNormal、vbReadOnly、vbHidden、vbSystem、vbVolume、vbDirectory。

    Kill: Kill (文件名)

            删除指定文件,文件名可包含路径。

    FileCopy: FileCopy 源文件,目标文件

            拷贝文件。

    Name: Name 旧文件名 As 新文件名

            文件重命名。前后路径不一致时,操作为移动文件并重命名。

    MkDir: MkDir path

            新建文件夹。

    RmDir: Rmdir path

            删除文件夹。

    ChDrive: ChDrive Drive

            改变当前驱动器 ChDrive "D"

    CurDir: CurDir [(driver)] 

          返回当前工作路径,指定driver则返回目标驱动器的当前工作路径。

    五、文件操作实战

    1、新建文本文件a.txt,写入数据,关闭。打开该文件,全部读入到新建文件b.txt,关闭。

    '新建文件,并写入数据,关闭
    Open "a.txt" For Output As #1
    Print #1, "ABCDEFG"; vbCrLf; "HIJK"
    Close #1

    '打开文件,并全部写入新文件,关闭
    Open "a.txt" For Input As #2
    Open "b.txt" For Output As #3
    Dim str As String
    While (Not EOF(2))
        Line Input #2, str
        Print #3, str
    Wend
    Close

    2、新建随机存储文件a.dat,写入数据,关闭。打开该文件,读入到新建文件b.dat,关闭。

    '以下代码位于Module模块
    '定义自定义类型结构体
    Public Type Struct
        elem1 As Integer
        elem2 As String * 5
    End Type

    '以下代码位于窗体模块
    '新建文件,并写入记录,关闭
    Open "a.dat" For Random As #1 Len = Len(st)
    Put #1, , st
    Close #1
    '打开文件,并写入新文件,关闭
    Open "a.dat" For Random As #2 Len = Len(st)
    Open "b.dat" For Random As #3 Len = Len(st)
    Dim st2 As Struct
    Get #2, , st2
    Put #3, , st2
    Close

    3、二进制文件操作类似于随机存储文件,不再举例。

     

     

     

     

     

     

     

     

     

     

     

     

    转载于:https://www.cnblogs.com/wgscd/p/7716669.html

    展开全文
  • VB - 数据文件(一)顺序文件

    万次阅读 2011-11-03 22:36:24
    1. 打开文件(Open) Open 文件名 [For模式][Access 存取类型][锁定]As [#]文件号[Len=记录长度]  说明: (1)文件名; (2) 模式用于指定文件访问的方式,包括: ... Input——顺序输入(输入给自己,从t
  • VB文件读写操作

    2010-12-17 20:39:35
     文件类型:顺序文件、随机文件、二进制文件。  访问模式:计算机访问文件的方式,VB中有顺序、随机、二进制三种访问模式。 2. 顺序访问模式  顺序访问模式的规则最简单,指读出或写入时,从第一条记录“顺序...
  • 顺序文件的写入(Write、Print):顺序文件存放的内容有两类:数据类型:每条记录的数据项固定 各数据项之间逗号分隔,字符串有双引号 每条记录以回车符结束文本类型:如写的文章、程序代码等每条记录可长可短,以...
  • vb常用文件读写操作

    千次阅读 2009-12-13 19:44:00
    1、顺序文件读写操作(Input, LineInput,Print,Write)Open Filepath For (For Mode) As #FilenumberFor Mode有三种:Input是读文件,要求指定的文件必须已打开。Output是写文件,如果找不到文件,则系统建一个...
  • 文件类型:顺序文件、随机文件、二进制文件。访问模式:计算机访问文件的方式,VB中有顺序、随机、二进制三种访问模式。2. 顺序访问模式顺序访问模式的规则最简单,指读出或写入时,从第一条记录“顺序”地读到最后...
  • VB读写文件

    2015-11-06 22:55:09
    VB读写文件要用到以下语句:   1、Open语句打开文件。   2、读文件使用Line Input、Input #,(以上为文本方式)和Get(以上为二进制方式)。   3、写文件使用Print #、Write(以上为文本方式)和Put(以上...
  • VB 动态数组,文件读写

    千次阅读 2016-04-06 16:05:20
    要将程序中的数据写到一个顺序文件,先打开文件以进行顺序输出或添加(注意此时的选用打开方式,选择Output则覆盖原来文件,选择Append则在原来文件后添加数据),可用下面的命令语句写入数据。 1、 Print # ...
  • (一)打开和关闭文件 1、顺序文件 打开顺序文件,我们可以使用Open语句。它的格式如下: Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize] 说明: (1)参数pathname 表示要打开的
  • 认识VB的随机文件

    千次阅读 2017-01-21 20:18:46
    随机文件是VB的一种类似于数据库的一种文件格式,它和顺序文件的最大区别是随机文件是以数据块为存储单位的(顺序文件则是以行或字符为单位的),就像把一大块蛋糕分成相等的N块,然后可以任意取出其中的某块,这也...
  • 满意答案emily6066842013.08.29采纳率:47%等级:13已帮助:8470人文件操作函数1、Open 文件名 [For方式] [Access存取类型] [锁定] AS [#]文件号 [Len=记录长度]功能:为文件的输入输出分配缓冲区,并确定缓冲区所...
  • vb读写文本文件

    2012-03-04 21:23:21
    VB读写文件要用到以下语句: 1、Open语句打开文件。 2、读文件使用Line Input、Input #,(以上为文本方式)和Get(以上为二进制方式)。 3、写文件使用Print #、Write(以上为文本方式)和Put(以上为二进制方式)...
  • VB 读取文件 VB6.0 实用FSO

    千次阅读 2015-04-24 19:19:51
     FileSystemObject是包含在Microsoft脚本运行时间中的一个对象,对象中的函数提供了读写文本文件的功能。  你可以通过调用OpenTextFile方法来读取一个文本文件。OpenTextFile方法的第一个参数是指定打开的...
  •  特点:速度快,可连续读写,缺点不能作为节点、元素等进行操作,常用于套接字或文件中获取XML文档。  (二)基于文档对象模型(DOM)的方式  特点:使用实体(节点、元素和特性)访问,定位灵活,但速度慢,是存储、...
  • vb顺序文件操作

    2012-06-09 17:58:48
    顺序文件 (逻辑顺序和物理顺序相同) 打开顺序文件  open “路径” For Input Access Read As #1  (说明:For Append文件末尾添加数据 For Input 顺序读取文件的数据For Output向文件写入数据————这些是...
  • VB 读写追加文件

    万次阅读 2007-08-07 20:13:00
    VB读写文件要用到以下语句: 1、Open语句打开文件。 2、读文件使用Line Input、Input #,(以上为文本方式)和Get(以上为二进制方式)。 3、写文件使用Print #、Write(以上为文本方式)和Put(以上为二进制方式)...
  • 关于顺序文件的描述,下面正确的是 ________。A) 每条记录的长度必须相同B) 可通过编程对文件中的某条记录方便地修改C) 数据只能以ASCII码形式存放在文件中,所以可通过文本编辑软件显示D) 文件的组织结构复杂2....
  • VB.net读写二进制数据方法

    千次阅读 2012-03-06 23:07:36
    一、二进制文件读写 1、写二进制数据到指定目录 dim barray() as byte dim strFileName as string My.Computer.FileSystem.WriteAllBytes(strFileName, barray, False)  ==>将barray字节数组中的...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 4,430
精华内容 1,772
关键字:

vb顺序文件的读写