向伟忠

摘  要 本文提出对Windows资源管理器操作的自动评分的一种方法：利用VB调用API函数对文件属性操作的自动评分;利用VB错误捕获和错误处理机制判断文件或文件夹是否存在而对文件的复制、移动等操作的自动评分

关键词 API，错误捕获，错误处理，自动评分

在计算机应用基础考试中，一般都是上机测试，这样才客观和准确，但如不能进行自动评分，那教师的改卷工作量将非常大并且评卷过程中主观性大，容易出错，为了减轻教师的工作量和评卷的准确，有必要实现自动评分。在上机测试中，Windows资源管理器操作主要是文件的操作：建立、删除、复制、移动、重命名、属性的更改、文件夹的建立，是考试的重点内容。利用VB调用Windows 的API函数读出目标文件或文件夹相关属性的值；利用VB的捕获错误及编写相应的处理程序可以判断目标文件或文件夹是否存在，就很容易判断各种操作是否正确。

一、API基础

API (Application Program Interface，即Windows的应用程序编程接口) 是一系列的底层函数，是系统提供给用户用于进入操作系统核心，进行高级编程的途径。通过在Visual Basic应用程序中声明外部过程就能够访问Windows API(以及其它的外部DLLs)。在声明了过程之后，调用它的方法与调用Visual Basic自己的过程相同。要声明一个DLL过程，需要在代码窗口的“声明”部分增加一个Declare语句，如果该过程返回一个值，应将其声明为Function。例如：Declare Function publicname Lib "libname" [Alias "alias"] [([[ByVal] variable [As type] [,[ByVal] variable [As type]]...])] As Type，如果过程没有返回值，可将其声明为Sub。缺省情况下，在标准模块中声明的DLL过程，可以在应用程序的任何地方调用它。在其他类型的模块中定义的DLL过程是模块私有的，必须在它们前面加上Private关键字，以示区分。特别提请注意的是，在32位的Visual Basic中过程名是区分大小写的。而在以前的16位版本中并不区分大小写。

二、VB错误捕获和错误处理机制

在VB中当应用程序中产生错误时，会进行下述操作：应用程序搜索错误处理程序，并把控制权传递给错误处理程序。如果执行完错误处理程序，控制权返回产生错误的语句。

利用VB的On Error 语句可以捕获出错语句，在捕获错误之后，就可以编写自己的应用程序采取适当行动来处理。On Error 语句语法：

On Error GoTo Line

在Line标号处写出错时执行的代码，最后退出错误处理程序

三、具体实现

在评分系统中用VB编程实现Windows资源管理器操作的自动评分

1.文件属性题目的自动评分

Windows资源管理器中文件属性的值有很多，现以常见的属性值：只读、隐藏、存档来说明怎样利用API函数来实现自动评分。

（1）声明API函数，声明公用函数