VB考试教程：文件处理函数

三、VB6.0的文件处理功能

在VB6.0中，除了使用文件控件来处理文件，还可以使用一些函数和方法来处理文件。常用的文件处理函数和方法包括Kill、FileCopy。RmDir、Shell和名称等。

1.Kill语句

Kill语句的功能是从磁盘上删除文件，其语法结构如下:

删除路径名

参数pathname是一个字符串表达式，用来指定文件名，pathname应该包括文件所在的目录(文件夹)和驱动器。

Kill支持多字符(*)和单字符(？)来指定多个文件。例如:

kill"c:\xy\*。bak "

驱动器C的xy目录中的备份文件将被删除。

Kill语句是“危险”的，因为执行时没有提示信息。

下面是一个应用Kill语句设计应用程序的例子(见教材P336)。它的作用是显示一个对话框，在对话框中选择一个要删除的文件，然后系统会自动完成删除。具体步骤如下:

(1)设计界面

首先将一个CommonDialog控件添加到工具箱中，然后将其添加到空白色表单中。

(2)添加代码

程序开始时，会显示一个删除文件的对话框。因此，在设计阶段双击该窗体，并在该窗体的Form_load()事件中添加以下代码:

private form _ load()
common dialog 1 . dialog title = "打开要删除的文件"'设置控件的标题。
common dialog 1 . filename = " *。doc " "/br/]common dialog 1 . filter = " *。doc " '设置过滤器。
CommonDialog1.showopen '显示对话框。
if common dialog 1 . filename = " *。doc "然后
else
kill common dialog 1 . filename '删除选定的文件
End If
End Sub

3.保存文件并运行程序。

[程序演示]

注意:使用Kill语句删除文件时，必须关闭文件，否则会出现错误。

2.FileCopy语句

file语句的作用是复制一个文件，其语法结构如下:

文件复制源，目标

FileCopy语句的语法中包含两个参数，其中soure用于指示要复制的源文件名，destination用于指定要复制的目标文件名。

源和目标参数都包括文件所在的目录或文件夹以及驱动器。

下面是一个应用FileCopy语句复制文件的程序示例。见教材P338。

(1)设计界面

向工具箱中添加一个Commondialog控件，并将其放置在空白色窗体上。

根据程序功能的要求，在窗体上添加两个CommandButton控件、两个TextBox控件和两个Label控件。

(2)编写程序的初始化代码。

在程序声明中定义两个全局变量。一个用于存储源文件路径和名称，另一个用于存储目标文件路径和名称。

' Dim source as string '定义了一个存储源文件的路径和名称的字符串变量。

' Dim destination as string '定义了一个存储目标文件的路径和名称的字符串变量。

(3)响应[打开]按钮的点击事件

在设计阶段双击“打开”按钮，在弹出的代码窗口中添加以下代码:

私有子命令1_click()

“CommonDialog1.showopen”显示一个对话框。

“Source=CommonDialog1.filename”存储源文件的路径和名称的字符串变量。

text 1 . text =源

末端接头

程序说明:程序首先通过CommonDialog1.show语句显示一个对话框，用户可以在其中选择要复制的源文件，然后将所选源文件的路径和文件名存储在变量soure中，并通过Text1.text=source在文本框中显示源文件的路径和文件名。

(4)响应【另存为】按钮的点击事件。

在设计阶段双击“另存为”按钮，并在其Command2_Click()事件中添加以下代码:

私有子命令2_click()

“CommonDialog1.showsave”显示一个对话框

' destination = common dialog 1 . filename '存储目标文件的路径和名称的字符串变量。

2.' Text2.text=destination '一个字符串变量，显示目标文件的路径和名称。

“复制源，目标”复制文件。

末端接头

6.存储文件和运行程序。

[程序演示]

3.外壳函数

我们已经介绍了通用过程的定义和调用。其实在VB中，还可以调用各种应用程序，也就是说，凡是能在DOS或Windows下运行的应用程序，基本上都可以在VB中调用。这个功能可以通过Shell函数来实现。

其语法结构如下:

Shell(路径名[，窗口样式])

参数描述:

Pathname是要执行的应用程序的名称，它的路径和必要的参数；

Windowstyle表示程序运行时窗口的样式。参数windowstyle的设置及其说明如下表所示:

设置常量值表示
0 vbHide窗口被隐藏，焦点将移至隐藏窗口
1 vbNormalFocus窗口有焦点，将被还原为其原始大小和位置
2 vbMinimizedFocus窗口将显示带有焦点的图标
3 vbMaximizedFocus窗口是焦点窗口
4 vbNormalNoFocus窗口将被还原为其最近使用的大小和位置，而当前活动窗口保持活动
6 VB