在考生目录下有一个工程文件sjt4.Vbp。窗体上的控件如图3-176所示。程序运行时,若选中“阶乘”单选按钮,则“1000”、“2000”菜单项不可用(如图3-176所示),若选中“累加”单选按钮,则“10”、“12”菜单项不可用。选中菜单中的一个菜单项

admin2016-01-31  19

问题 在考生目录下有一个工程文件sjt4.Vbp。窗体上的控件如图3-176所示。程序运行时,若选中“阶乘”单选按钮,则“1000”、“2000”菜单项不可用(如图3-176所示),若选中“累加”单选按钮,则“10”、“12”菜单项不可用。选中菜单中的一个菜单项后,单击“计算”按钮,则相应的计算结果显示在文本框中(例如选中“阶乘”和“10”,则计算10!,选中“累加”和“2000”,则计算1+2+3+…+2000)。单击“存盘”按钮,则把文本框中的结果保存到考生目录下的out4.dat文件中。
    要求:编写“计算”按钮的Click事件过程。
   
    注意:不得修改已经存在的程序,在结束程序运行之前,必须用“存盘”按钮存储计算结果,否则无成绩。最后,程序按原文件名存盘。

选项

答案审题分析 本题源程序要求编写“计算”按钮的单击事件。当单击按钮时,首先判断两个单选按钮选中了哪一个,如果选中了“阶乘”按钮,则执行阶乘算法,将从1到n的数值依次乘到累乘积s中;若选中了“累加”按钮,则执行累加算法,将从1到n的数值依次加到累加和s中。注意s作为累乘积的时候初值应该为1,而作为累加和的时候初值应该为0。最后将s的值显示在文本框中。 操作步骤 步骤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:按键运行程序,选择不同选项,单击“数值”菜单项,并且选择一个可用的数值,然后单击“计算”按钮得到结果,最后单击“存盘”按钮保存结果。 考点链接 For循环结构、选择控件。

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

最新回复(0)