数据库应用基础期末考试表单题库答案

《数据库应用基础期末考试表单题库答案》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、25．编制“学生”表信息查询界面，要求如图1、图2、图3所示。图1用户选择前的运行界面图2用户选择同学后的运行界面答案：（学生表拉到数据环境）（把“性别”字段拉到表单内，改Caption）（1）表单Form1的Init事件代码：Thisform.Label1.Caption=”请选择学生姓名”Thisform.Label2..Caption=”学号”Thisform.Label3..Caption=”姓名”Thisform.Labe4..Caption=”性别”Thisform.Label5..Caption=”出生年月”Thisform.Label6..Caption=”奖学金

2、”Thisform.Check1.Caption=”选中为’男’,否则为’女’”Thisform.Caption=”学生表信息查询”Thisform.Setall(“Readonly”,.T.,”TextBox”)Thisform.Check1.Readonly=.T.（2）列表框List的InterActiveChange事件代码：ThisForm.SetAll("Visible",.T.)ThisForm.Refresh19．编制一个表单完成表文件“学生.dbf”内容的学生奖学金查询显示功能（界面如图所示）。要求：①当用户在组合框输入或选择班级（学号的前三位）后，按回车或“确

3、定”按钮时，表单将自动显示对应班级的奖学金总额；②按“退出”按钮时，自动关闭表单。图:用户选择确定后的运行界面答案：(把学生表拉到数据环境)(1)表单Form1的Init事件代码：SETTALKOFFSETSAFETYOFFINDEXONLEFT(学生.学号,3)TOXHUNIQUEThisform.Combo1.DisplayValue=Left(学生.学号,3)SCANThisform.Combo1.AddItem(Left(学生.学号,3))ENDSCANSETINDEXTO(2)组合框Combo1的Valid事件代码：IFEMPTY(This.DisplayValue)R

4、ETURN.T.ENDIFLOCATEFORLEFT(ALLTRIM(学生.学号),3)==LEFT(ALLTRIM(This.DisplayValue),3)IFEOF()RETURN.F.ELSERETURN.T.ENDIF(3)命令按扭Command1的Click事件代码:SUM奖学金TOMJXJFORLEFT(ALLTRIM(学号),3)==LEFT(ALLTRIM;(Thisform.Combo1.DisplayValue),3)Thisform.Text1.Value=MJXJ(4)命令按扭Command2的Click事件代码:Thisform.Release18．建

5、立一个表单，通过每次单击“开始”按钮，都能实现表单的标签信息从顶行向下平移，移到底边即停止。设计界面如图所示。标签高度为30像素，字体颜色为蓝色。图：信息单向平移表单设计界面答案：(Foreclour)(1)表单Form1的Init事件：Thisform.Timer1.Enabled=.F.(2)命令按扭Command1的事件代码:Thisform.Timer1.Enabled=.T.(3)命令按扭Command2的事件代码:Thisform.Release(4)计时器Timer1的Timer事件：IFThisform.Label1.Top<=Thisform.Height-Th

6、isform.Label1.HeightThisform.Label1.Top=Thisform.Label1.Top+1ENDIFThisform.Refresh16．运用文本框和计时器对象设计一个数字时钟表单，界面如图1、2所示。要求：文本框文字为隶书、20号字，表单的标题为“数字时钟”，每隔1秒钟刷新一次时间。图1：设计界面图2：运行界面答案：（1）表单Form1的Init事件代码：Thisform.Caption="数字时钟"Thisform.Text1.FontName="隶书"Thisform.Text1.FontSize=30Thisform.Timer.Inter

7、val=1000(2)计时器Timer1的Timer事件：Thisform.Text1.Value=LEFT(TIME(),2)+"时"+SUBSTR(TIME(),4,2)+"分"+RIGHT(TIME(),2)+"秒"15．设计一个圆球跳动表单。要求：球的宽和高为40，球的填充颜色为咖啡色，表单的标题为“圆球跳动”，球每隔0.5秒在表单的上下边之间跳动。按开始按钮球跳动，按停止按钮球停止。设计界面和运行界面见下图所示。答案：（属性curvature设置为99backcolor