近几年度自考管理系统中计算机硬应用题汇总

三、应用题：

1、.假定已经在类库YHLK中创建了自定义工具栏子类GJL，为了能够让工具栏显示在屏幕上，创建了如下程序段。请按程序注释在空白处填空，补充各程序行内容。

SET CLASSLIB TO YHLK&&打开用户类库

_SCREEN.ADDOBJECT(　(1)　,　(2)　) &&用子类创建工具栏对象

(3)　.　(4)　.LEFT=0 &&设定对象的屏幕左界

(5)　. 　(6)　.TOP=－6 &&设定对象的屏幕上界

(7)　.QQQ. 　(8)　=.T. &&设定对象的可视属性为真

(9)　.QQQ. 　(10)　=.T. &&设定对象的可用属性为真

2、需要输出的教工信息报表如下所示：(假定工资超过1000元所得税按10%计算)

其中所得税、实发工资及两个统计项是报表输出时计算所得，如果报表布局形式如下

其中总结带区中两个统计项的变量X、Y是通过数据环境的INIT事件程序计算得到的。

请在后面的编号位置补充完成下面的INIT事件程序。

PUBLIC X，Y

___________(1)___________ &&计算人数

___________(2)___________ &&计算工资总和

每人的所得税和实发工资两项用域控件实现，请将各操作步骤在后面的编号位置补充完整。

①选定工具栏域控件后在报表布局的_____(3)_____带区相应所得税位置单击；

②在报表表达式对话框中输入表达式_____(4)_____；

③在报表表达式对话框中输入格式_____(5)_____；单击确定按钮关闭对话框；

④选定工具栏域控件后在报表布局的_____(6)_____带区相应实发工资位置单击；

⑤在报表表达式对话框中输入表达式_____(7)_____；

⑥在报表表达式对话框中输入格式_____(8)_____，单击确定按钮关闭对话框。

3、有一个数据浏览界面如图所示。

单击“向后”或“向前”按钮可以从前向后或从后向前浏览数据表中的数据，如果“向后”按钮的方法程序如下：

IF！EOF( )

SKIP

ELSE

GO TOP

ENDIF

THISFORM.REFRESH

那么当浏览到最后一条记录时，若再单击该按钮将会出现 (1) 现象。如果“向前”按钮的方法程序如下：

IF！BOF( )

SKIP-1

ELSE

GO BOTTOM

ENDIF

THISFORM.REFRESH

那么，当浏览到第一条记录时，若再单击该按钮将会出现 (2) 现象。为了克服这种情况，可将“向后”和“向前”按钮的方法程序分别修改为：

SKIP

IF EOF( )

GO TOP

ENDIF

THISFORM.REFRESH

和

SKIP-1

IF BOF( )

GO BOTTOM

ENDIF

THISFORM.REFRESH

但是如果数据表是空的，单击“向后”按钮将会提示 (3) ；单击“向前”按钮将提示 (4) 。

为了避免出现这样的提示可以增加一个判断语句。例如“向前”按钮的方法程序可以改为：

IF (5) =0

SKIP

IF EOF( )

GO TOP

ENDIF

THISFORM.REFRESH

ENDIF

请补充完善程序及说明，填写在下面标号后。

43.某新华书店的计算机管理系统中，需要为顾客购书建立销售记录。已知“销售记录”、

“图书目录”的数据表内容如下所示：

该界面的操作过程是：先输入书号，在“图书目录”表中判断书号是否正确，如果正确，向“销售记录”表添加一个空记录，输入数量和折扣，同时在右边的列表中显示已经输入的图书书名、单价。以上过程可以重复。一个顾客购买的图书全部输入完成后，单击“完成”按钮，显示总书款和折扣后的应付书款。试回答以下问题：

(1)该输入界面共应用了哪几种Visual FoxPro控件，控件的总数是多少?(5分)

41.用计时器控制电子标语牌中标语从右至左移动，标语从标语牌左端全部移出后立刻会从右端移入。单击“暂停”按钮可以使标语暂停移动，同时该按钮标题变成“继续”；再单击该按钮标语继续移动，同时按钮标题又变成“暂停”。标语长度为272，标语牌宽度400。请完善下面的属性设置和程序语句。

标语牌属性：

HEIGHT=56

WIDTH=__(1)__

标语属性：

HEIGHT=33

WIDTH=__(2)__

计时器属性：

__(3)__=100

计时器的TIMER过程

IF THISFORM.LABEL1__(4)__+272＞0

THIS