1、二级 VISUAL+FOXPRO机试-68 及答案解析(总分：100.00，做题时间：90 分钟)1.对“学生”表中的记录进行排序，用表格显示记录，并用“命令”按钮选择按学号或入校总分排序显示。表单样式如图 3-1所示。（分数：25.00）_2.设计如图 3-6所示的表单(列表框应用)：在文本框中输入内容，单击“确定”按钮加入到列表框中，对于重复内容，列表框中只列出一项。在列表框中选定项，该选项自动显示在另一个文本框中，选中的项目可删除。当未在列表框中选定项时，“删除”按钮和“全部清除”按钮不可用。（分数：25.00）_3.设计一个通话计费程序，假设每分钟通话费用为 0.20元，初始时，开始时
2、间、结束时间、通话分钟和应付金额都为空。单击“开始”按钮，显示开始时间：单击“计费”按钮，显示结束时间、通话分钟和应付金额(每分钟 0.20元，不满 1分钟按 1分钟计费)。表单样式如图 3-7 所示。（分数：25.00）_4.输入正方体的边长，利用“选项”按钮，选择计算表面积、体积等。要求初始时不显示 label2 (“表面积为”)和 label3(“体积为”)，一旦输入新数据，立即根据选项组的选择显示相应结果，当选择计算表面积时，不出现体积项，同样，选择显示体积时，不显示表面积项。表单样式如图 3-11所示。（分数：25.00）_二级 VISUAL+FOXPRO机试-68 答案解析(总分：
3、100.00，做题时间：90 分钟)1.对“学生”表中的记录进行排序，用表格显示记录，并用“命令”按钮选择按学号或入校总分排序显示。表单样式如图 3-1所示。（分数：25.00）_正确答案：(指导 操作步骤如下：在表单中创建 1个“表格”控件和 3个“命令按钮”控件，并选择好位置和大小。设置控件的字体和字号。打开“数据环境设计器”，添加表“学生”。表单控件的主要属性见表 3-1。表 3-1 “学生浏览”表单和控件主要属性设置及说明对象名 属性名 属性名 说明Cursor1 Exclusive .T. 设置数据表打开方式为独占Gridl1 ReeordSource 学生 表格数据源Command
4、1 Caption 按学号显示 按钮标题Command2 Caption 按入校总分显示 按钮标题Command3 Caption 关闭 按钮标题Gridl. Colunm 1 Contro1. Source学生.学号 列的数据源Gridl. Columnl.Header1 Caption 学号 列标题Gridl. Columnl.text1 ControlSource 学生.学号 列数据Gridl. Column2 Control. Source学生.姓名 列的数据源Gridl. Column2.Header1 Caption 姓名 列标题Gridl. Column2.text 1 Cont
5、rolSource 学生.姓名 列数据Gridl. Column3 Control. Source学生.性别 列的数据源Gridl. Colunm3.Header1 Caption 性别 列标题Gridl. Column3.text1 ControlSource 学生.性别 列数据Gridl. Column4 Control. Source学生.入校总分 列的数据源Gridl. Column4.Header1 Caption 入校总分 列标题Gridl. Colunm4.text 1 ControlSource 学生.入校总分 列数据打开“代码编辑”窗口，添加 Form1的 Init事件代码，
6、如图 3-2所示。*添加“按学号显示”按钮 Command1的 Click事件代码，如图 3-3所示。*添加“按入校总分显示”按钮 Command2的 Click事件代码，如图 3-4所示。*添加“关闭”按钮 Command3的 Click事件代码，如图 3-5所示。*)解析：2.设计如图 3-6所示的表单(列表框应用)：在文本框中输入内容，单击“确定”按钮加入到列表框中，对于重复内容，列表框中只列出一项。在列表框中选定项，该选项自动显示在另一个文本框中，选中的项目可删除。当未在列表框中选定项时，“删除”按钮和“全部清除”按钮不可用。（分数：25.00）_正确答案：(指导 操作步骤如下：在表单
7、中创建 2个“标签”控件、2 个“文本框”、1 个“列表框”控件和 4个 “命令按钮”控件，并选择好位置和大小。设置控件的字体和字号。表单控件的主要属性见表 3-2。表 3-2 “文本框与列表框练习”表单和控件主要属性设置及说明对象名 属性名 属性名 说明Label1 Caption 输入项目 标签标题Label2 Caption 你选中 标签标题Command1 Caption 确定 按钮标题Command3 Caption 删除 按钮标题Command4 Caption 全部清除 按钮标题Command5 Caption 退出 按钮标题添加列表框 Listl的 Click事件代码，该事件代
8、码如下：for i=l to this.listcountif this.selected(i)thisform.text2.value=this.list(i)mand2.enabled=.t.添加“确定”按钮 Command1的 Click事件代码，该事件代码如下：thisform.listl.additem(alltrim(thisform.textl.value)thisform.listl.refreshthisform.textl.value=“ “thisform.textl.setfocus()mand3.enabled=mand4.enabled=.t.添加“删除”按钮 Co
9、mmand3的 Click事件代码，该事件代码如下：for i=l to thisform.listl.listcountif thisform.listl.selected(i)tid=iendifendfor=messagebox ( “第“+str (tid, 2) +已被选中, 0+16+64, “删除“)thisform.listl.removeitem(tid)=messagebox (“此条信息已被删除“, 0+16+64, “确定“ )if thisform.listl.listcount=mand3.enabled=mand4.enabled=.f.thisform.text
10、2.value=returnendifif thisform.listl.listcount=tidthisform.listl.selected(tid)=.t.elsethisform.listl.selected(thisform.listl.listcount)=.t.endifthisform.text2.value=thisform.listl.list(tid)thisform.listl.gotfocus()添加“全部清除”按钮 Conunand4的 Click事件代码，事件代码如下：for i=thisform.listl.listcount to 1 setp -1this
11、form.listl.removeitem(i)mand3.enabled=mand4.enabled=.f.thisform.text2.value=thisform.listl.refresh添加“退出”按钮 Command5的 Click事件代码，事件代码为；release thisform)解析：3.设计一个通话计费程序，假设每分钟通话费用为 0.20元，初始时，开始时间、结束时间、通话分钟和应付金额都为空。单击“开始”按钮，显示开始时间：单击“计费”按钮，显示结束时间、通话分钟和应付金额(每分钟 0.20元，不满 1分钟按 1分钟计费)。表单样式如图 3-7 所示。（分数：25.00
12、）_正确答案：(指导 操作步骤如下：在表单中创建 11个“标签”控件、3 个“命令按钮”和一个“计时器；控件，并选择好位置和大小。设置控件的字体和字号。表单控件的主要属性见表 3-3。表 3-3 “计时收费”表单和控件主要属性设置及说明对象名 属性名 属性值 说明Label1 Caption 通话计费 标签标题Label2 Caption 当前时间 标签标题Label3 Caption 开始时间 标签标题Label4 Caption 结束时间 标签标题Label5 Caption 通话分钟 标签标题Label6 Caption 应付金额 标签标题Ctime Caption (无) 当前时间St
13、ime Caption (无) 开始时间Etime Caption (无) 结束时间Ltime Caption (无) 通话时间Pay Caption (无) 金额Timer1 Caption 1000 计时间隔 1秒Command1 Caption 开始 按钮标题Command2 Caption 计费 按钮标题Command3 Caption 关闭 按钮标题打开“代码编辑”窗口，添加 Form1的 Init事件代码，如图 3-8所示。*添加“开始”按钮 Command1的 Click事件代码，如图 3-9所示。*添加“计费”按钮 Command2的 Click事件代码，如图 3-10所示。*
14、添加“关闭”按钮 Command3的 Click事件代码，代码如下：release thisform)解析：4.输入正方体的边长，利用“选项”按钮，选择计算表面积、体积等。要求初始时不显示 label2 (“表面积为”)和 label3(“体积为”)，一旦输入新数据，立即根据选项组的选择显示相应结果，当选择计算表面积时，不出现体积项，同样，选择显示体积时，不显示表面积项。表单样式如图 3-11所示。（分数：25.00）_正确答案：(指导 操作步骤如下：在表单中创建 3个“标签”控件、一个“文本框”控件、1 个“单选组”和一个“命令按钮”控件，并选择好位置和大小。设置控件的字体和字号。表单控件的
15、主要属性见表 3-4。表 3-4 “正方体计算”表单和控件主要属性设置及说明对象台 属性名 属性值 说明Label1 Caption 输入正方体边长： 标签标题Label2 Caption 表面积为： 标签标题Label3 Caption 体积为： 标签标题Optiongroup 1.option1 Caption 计算正方体表面积 选项标题Optiongroup 1.option2 Caption 计算正方体体积 选项标题Optiongroup 1.option3 Caption 计算表面积和体积 选项标题Command1 Caption 退出 按钮标题打开“代码编辑”窗口，添加 Text1的 LostFocus事件代码，如图 3-12所示。*添加“选项组”Optiongroup1 的 Click事件代码，如图 3-13所示。*添加“退出”按钮 Command1的 Click事件代码，如图 3-14所示。*)解析：
