应用题

(1)请修改并执行名称为 forml 的表单, 要求如下:
①为表单建立数据环境, 并将“雇员” 表添加到数据环境中。
②将表单标题修改为“XXX 公司雇员信息维护”。
③修改命令按钮“刷新日期” 的 Click 事件下的语句, 使用 SQL 的更新命令, 将“雇员”表中“日期” 字段值更换成当前计算机的日期值。 注意: 只能在原语句上进行修改, 不可以增加语句行。
(2)建立一个名称为 mellUl 的菜单, 菜单栏有“文件"和“编辑浏览” 两个菜单。“文件”菜单下有“打开”、“关闭退出” 两个子菜单; “编辑浏览” 菜单下有“雇员编辑”、“部门编辑” 和“雇员浏览” 三个子菜单。

【正确答案】

(1)步骤 1: 在命令窗口执行命令: MODIFY FORM FORM1, 打开表单设计器修表单。
步骤 2: 右击表单选择[数据环境]快捷菜单命令, 继续在表单数据环境中单击右键选择[添加]快捷菜单命令, 在“添加表或视图” 对话框中双击“雇员” 表, 将表添加到数据环境中。
步骤 3: 在“属性”面板中修改表单(Forml)的 Caption 属性值为“XXX 公司雇员信息维护”。
步骤 4: 双击表单中的“刷新日期” 命令按钮(Commandl), 查看按钮的 Click 事件代码:
UPDATE ALL 日期 WITH DATE()
> 修改后的代码如下:
UPDATE 雇员 SET 日期=DATE()
步骤 5: 单击“常用” 工具栏中的“运行” 按钮查看结果, 将表单文件保存到考生文件夹下。
(2)步骤 1: 在命令窗口执行命令: CREATE MENU menul, 在弹出的“新建菜单” 对话框中单击“菜单” 图标按钮, 打开菜单设计器。
步骤 2: 在菜单设计器“菜单名称” 列的文本框中依次输入“文件” 和“编辑浏览” 两个主菜单名,“结果” 下拉框中选择为“子菜单”, 单击“文件” 行的“创建” 按钮进入下级菜单设计, 在“菜单名称” 列的第 l、 2 行文本框中依次输入子菜单名“打开” 和“关闭退出”。
步骤 3: 通过“菜单级” 下拉框返回主菜单项设计界面, 参照步骤 2 的操作再建立“编辑浏览” 的下级菜单。
步骤 4: 执行[菜单]→[生成]菜单命令, 在弹出的 Visual FoxPro 对话框中单击“是” 按钮,接着系统会弹出“生成菜单” 对话框, 单击“生成” 按钮生成一个可执行的菜单文件。

【答案解析】

(1)本题考查了表单及控件的常用属性、 时间和方法; 表单数据环境; SQL 更新语句。
在表单设计器中可以通过快捷菜单命令或“表单设计器” 工具栏打开数据环境; 修改表单的属性可以在“属性” 面板中操作, 标题属性为 Caption; 利用 SQL 更新语句修改表记录,其固定的语法结构是: UPDATE 表名 SET 字段名=表达式[, 字段名 1=表达式 1. „]WHERE 条件表达式。
(2)本题主要考查了下拉菜单的设计, 操作过程中注意主菜单和子菜单的操作, 从子菜单返回主菜单设计界面, 可以使用菜单设计器右侧的“菜单栏” 下拉框, 另外, 编写“退出”菜单命令时, 要热记返回系统菜单的命令语句: SET SYSMENU TO DEFAULT; 最后要注意生成可执行菜单文件。