2. 计算机
  3. score manager数据库中含有三个数据库表student、score1和course。为了对score_manager数据库数据进行查询，设计一个如图2—37所示的表单myform1(控件名为form1，表单文件名myform1．scx)。表单的标

score manager数据库中含有三个数据库表student、score1和course。为了对score_manager数据库数据进行查询，设计一个如图2—37所示的表单myform1(控件名为form1，表单文件名myform1．scx)。表单的标

admin2016-12-05  38
问题 score manager数据库中含有三个数据库表student、score1和course。为了对score_manager数据库数据进行查询，设计一个如图2—37所示的表单myform1(控件名为form1，表单文件名myform1．scx)。表单的标题为“成绩查询”。

    表单中有文本“输入学号(名称为Label1的标签)”和用于输入学号的文本框(名称为Text1)以及“查询”(名称为Command1)和“退出”(名称为Command2)两个命令按钮以及一个表格控件。
    表单运行时，用户首先在文本框中输入学号，然后单击“查询”按钮，如果输入学号正确，在表单右侧以表格(名称为Grid1)形式显示该生所选课程名和成绩，否则提示“学号不存在，请重新输入学号”。
    单击“退出”按钮，关闭表单。
选项
答案【操作步骤】 步骤1：在命令窗口执行命令：CREATE FORM myform1，打开表单设计器新建表单。 步骤2：从“表单控件”工具栏中依次向表单添加一个标签、一个文本框、两个命令按钮和一个表格控件。在“属性”面板的下拉框中选择表单对象，往“全部”选项卡中修改对象属性值，见表3—39。 [*] 步骤3：双击命令按钮，编写各个命令按钮的Click事件代码。各按钮代码如下： *****查询(comrrlandl)的click事件代码***** 1 GO TOP 2 LOCATE FOR Student．学号＝＝ALLTRIM (THISFORM．TEXT1．VALUE) 3 IF Student．学号＝＝ALLTRIM(THISFORM． TEXT1．VALUE) 4 THISFORM．GRID1．RECORDSOURCE＝"SEL ECT Course．课程名，score1．成绩； 5 FROM course INNER JOIN score1； 6 INNER JOIN student； 7 ON student．学号＝score1．学号； 8 ON course．课程号＝Score1．课程号； 9 WHERE student．学号 ＝ALLTRIM (THISFORM．TEXT1．VALUE)； 10 INTO CURSOR TEMP" 11 ELSE 12 MESSAGEBOX("学号不存在，请重新输入学号") 13 TH工SFORM．GRID1．RECORDSOURCE＝" 14 ENDIF *****“退出”按钮的Click事件代码***** THISFORM．RELEASE 步骤4：单击“常用”工具栏中的“运行”按钮查看结果，将表单文件保存到考生文件夹下。
解析
转载请注明原文地址:https://kaotiyun.com/show/jNIp777K
本试题收录于： 二级VF题库NCRE全国计算机二级分类
0

二级VF

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)