(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有一个标题为“得分”的框架,在框架中有一个名称为Text1的文本框数组,含六个元素;文本框Text2 用来输入难度系数。程序运行时,在左边的六个文本框中输入6 个得分,输入难度系数后,单击“计算分数

admin2019-06-11  30

问题 (1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有一个标题为“得分”的框架,在框架中有一个名称为Text1的文本框数组,含六个元素;文本框Text2 用来输入难度系数。程序运行时,在左边的六个文本框中输入6 个得分,输入难度系数后,单击“计算分数”按钮,则可计算出最后得分并在文本框Text3中显示(如图1-18所示)。

    计算方法:去掉一个最高得分和一个最低得分,求剩下得分的平均分,再乘以3,再乘以难度系数。最后结果保留到第2 位小数,不四舍五入。
    注意:文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?为正确的内容。考生不能修改程序中的其他部分和各控件的属性。最后把修改后的文件按原文件名存盘。
    (2)在考生目录下有一个工程文件sjt4.vbp。窗体上的控件如图1-19所示。程序运行时,若选中“阶乘”单选按钮,则“1000”“2000”菜单项不可用(如图1-19所示),若选中“累加”单选按钮,则“10”、“12”菜单项不可用。选中菜单中的一个菜单项后,单击“计算”按钮,则相应的计算结果显示在文本框中(例如选中“阶乘”和“10”,则计算10!,选中“累加”和“2000”,则计算1+2+3+…+2000)。单击“存盘”按钮,则把文本框中的结果保存到考生目录下的out4.dat 文件中。

     要求:编写“计算”按钮的Click事件过程。
     注意:不得修改已经存在的程序,在结束程序运行之前,必须用“存盘”按钮存储计算结果,否则无成绩。最后,程序按原文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: For k = 1 To 5 If a < Val(Text1(k).Text) Then s = (s - a - b)/4 s = s * 3 * Val(Text2.Text) Text3.Text = Int(s * 100)/100 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件 sjt4.vbp。参考代码: 步骤2:打开代码编辑窗口,编写“计算”按钮的单击事件过程。 参考代码: Private Sub Command1_Click() If Option1.Value = True Then s = 1 For k = 1 To n s = s * k Next End If。 If Option2.Value = True Then s = 0 For k = 1 To n s = s + k Next End If Text1 = s End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按<F5>键运行程序,选择不同选项,单击“数值”菜单项,并且选择一个可用的数值,然后单击“计算”按钮得到结果,最后单击“存盘”按钮保存结果。

解析
转载请注明原文地址:https://jikaoti.com/ti/ttN0FFFM
0

最新回复(0)