VB基础3

    技术2022-05-20  56

    一。文件管理

     

    文件和目录操作的有关语句和函数

    与文件,目录操作有关的控件

    文件的读写

     

     

    驱动器号,目录,文件名

     

    目录的操作:

    1.用来改变当前驱动器的名称:

    语句:ChDrive<驱动器名>

    eg:ChDrive “”

          ChDrive “A”    ChDrive “BCD”此时指的是B驱动器

     

    2.用来改变目录:

    语句:ChDri<目录>

     

    3.用来建立新的子目录:

    语句:MKDir<目录>

     

    4.用来删除子目录

    语句:RmDir<目录>

    RimDir只能删除空的子目录,在删除该目录之前,应先确保它包含的文件及下级子目录全部删除,还有不能删除根目录及当前目录,若要删除则要退回前一目录或者其他目录中

     

    5.用来读取当前目录

    语句:CurDir([<驱动器号>])

     

     

    6.用来读取文件名,目录名、或者卷标名 Dir函数

     

    语句:Dir([<文件名或者目录名或驱动器名>,[<属性>]])

    读取文件名可以用通配符  "*"  和 "?"  

     

     

     

     

    文件的操作:

     

    1.用来复制文件的语句

    语句:FileCopy<源文件名>,<目录文件名>

     

     

    2.用来删除文件的语句

    语句:Kill<文件名>

    不能删除已经打开的文件,要想将其删除必先关闭它

     

    3.用来设置文件属性的语句

    语句:SetAttr<文件名>,<属性>

    属性有五个

     

    4.用来读取文件属性的语句

    语句:GetAttr<文件名>

    不能对已经打开的文件设置属性

     

    GetAttr函数返回一个Integer值

     

    若要判断一个文件是否设置了某个属性值,应该使用And运算符将这个属性值与该文件的GetAttr函数进行逐位比较,若结果不为零则表示该文件设置了属性值

     

     

     

    与应用程序有关的App对象

     

    App对象的Path属性

     

     

     

    与文件,目录操作有关的控件

     

    DriverListBox控件

     

    DirListBox控件

     

    FileListBox控件

     

     

     

     

     

     

     

    文件的读写:

     

     

    文件访问类型:

    顺序型,随机型,二进制型

     

     

     

    顺序文件

    打开顺序文件:

    语句:Open<文件名>For[Input | Output | Append] As [#]<文件号>

     

    <文件号>即文件句柄,是专为这个文件而指定的一个有效的号码,其值是一个整数数字,范围在1-511

    可以用freefile函数取得当前状态下下一个可用的文件号

     

    Input函数:

     

    语句:Input(<读取的字符长度>,<文件号>)

     

    App.path是代表一个相对路径,随程序的目录改变而改变

     

     

    Line Input得到一行字符,遇到回车/换行符会删掉

    语句:Line Input #<文件号>,<变量>

     

    Input #(略)

     

     

     

    对文件进行写操作

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     


    最新回复(0)