2003年上半年全國高等教育自學考試天津地區
計算機信息管理專業（專科）
《管理信息系統》上機考試試卷J

說明：本上機考試環境為 Windows95／98 操作系統，使用的軟件為 Foxpro 2.5b For Windows．
考生必讀：考生首先根據教師的要求在指定的計算機硬盤上建立一個以MIS打頭，加上自己的準考證號為名字的子文件夾（假設考生的準考證號為12345678，則在D盤或E盤上建立一個名為“MIS12345678”的子文件夾），根據本試卷建立的數據庫文件和程序文件必須存入此文件夾，并在考試結束前將此文件夾連同里面的所有文件拷貝到軟盤中。監考教師不回答如何向指定文件夾存儲文件或拷貝文件的問題．對于出現的未能按要求在指定文件夾中建立文件或拷貝到軟盤情況由考生自己負責。
一、在考生文件夾下建立如下結構的數據庫文件并輸入相應記錄，并在試卷上簡述操作步聚（包括必要的命令）：（不分）
學生數據庫文件（STUDENTDBF）如下：
Field Field Name Type     width     Dec
1     學號     character     6
2     姓名     Character     6
3     年齡     Numeric       2       0  
學生數據庫文件的記錄如下：
Record# 學號     姓名     年齡
1     980001     王芳     21
2     980002     黃瑋     20
3     980003     林露     22
4     980004     錢千里   22
二、在考生文件夾下設計一個名為WndowJ.PRG的程序文件，其功能為建立如圖所示窗口（注意：所定義窗口控制菜單中的命令必須與圖例相同）。同時在試卷上寫出所設計程序文件中包括的語句：（20分）

　

三、在考生文件夾下設計一個名為MenuJ．PRG的程序文件，其功能為建立如圖所示的彈出式菜單，其中的退出命令可以執行，并能返回到FoxPro。同時在試卷上寫出所設計程序文件中包括的語句：（20分）

　

四、下述程序功能是刪除學生數據庫文件（STUDENTDBF）中的某些記錄，請補充完整（不
得修改所給語句）。注意：只需在試卷上填充完整即可（40 分）
SET TALK OFF
Clear
USE STUDENT
INDEX ON 學號 TO XHIDX
                                                 ①
ANSWER＝.T.
DO WHILE ACTION
CLEAR
DELEXH＝SPACE（6）
＠l．2 SAY"請輸入要刪除的學號：" GET DELEXH PICT"999999"
READ
                                                   ②
IF FOUND()
CLEAR
DISPLAY
＠ROW()+1,1 SAY "真的要刪除該學生記錄嗎?[y/n]" GET ANSWER PICT "L"
READ
IF                           (3)
                                          ④
CLEAR
＠1,1 SAY "該學生記錄已被刪除!"
ENDIF
ELSE
CLEAR
＠1.1SAY "該學生記錄不存在！"
ENDIF
ENDDO
USE
SET TALK ON
CLEAR
RETURN