[问答题] 在考生文件夹下有一个工程文件sjt4.vbp，运行情况如图所示。程序的功能是计算下列表达式的值：Z=(X+2)^2+(X+3)^3+(X+4)^4+…+(X+N)^

23 查阅

[问答题] 在考生文件夹下有一个工程文件sjt4.vbp，运行情况如图所示。程序的功能是计算下列表达式的值：Z=(X+2)^2+(X+3)^3+(X+4)^4+…+(X+N)^N其中N和x的值通过键盘分别输入到文本框Text1、Text2中。之后如果单击标题为“计算”、名称为Command1的命令按钮，则计算表达式的值Z，并将计算结果显示在名称为Label1 的标签中。在给出的窗体文件中已经添加了全部控件和程序，但程序不完整。要求去掉程序中的注释符，把程序中的问号改为正确的内容。注意：考生不得修改窗体文件中已经存在的程序。程序中不得使用^运算符，而应使用函数xn进行幂运算。程序至少运行一次，按照下图输入数据，使X=10，N=5，单击“计算”按钮，计算Z的值，并将结果显示在标签Label1中，否则本题没有成绩。最后，将修改后的程序按原文件名存盘。

参考答案:

[操作步骤]步骤A：打开本题工程文件。步骤B：分析并编写程序代码。 Private Function xn(a As Single,m As Integer) Dim i As Integer tmp=A For i=A To m tmp=tmp*a’求ai的结果 Next xn=tmp’返回计算结果 End Function Private Sub CommandA_Click( ) Dim n As Integer Dim i As Integer Dim t As Singl

[解题思路] 通过For循环语句实现xn( )的幂运算；Click事件过程中通过Val( )函数实现字符类型向数值型的转换，通过循环语句及调用xn( )函数，获得函数返回值，实现表达式的运算结果；运用Call语句调用SaveResuit函数对结果进行保存，涉及文件的Open、Close和Output操作，最后将结果保存在文件夹下的out4.dat文件中。

计算机考试