1、首先在电脑中打开VB,之后选择“标准EXE”。
2、然后,双击窗口,会打开一个代码编辑器。
3、在代码编辑器中先声明一个精确的变量a(dim a as integer),然后使用inputbox函数(a=inputbox([prompt],[title]))。
4、然后点击页面上方的运行,如下图所示。
5、点击弹出框中的确定,这样就完成了。
从函数代码来看,这是一个计算数a的m次方的自定义函数
从1到m循环:是让a连乘m次
tmp=tmp*a:一开始tmp=1,所以tmp=tmp*a=1*a=a=a的1次方,第二次循环,tmp=tmp*a=a*a=a的2次方,依此类推,一直到tmp=a的m次方
xn=tmp:是为了把最终的计算结果(也就是a的m次方)作为函数xn的返回值
这个函数的使用例子:
Private Sub Command1_Click()
Print xn(2, 3) '这是计算2的3次方
End Sub
其实,从实用角度来看,这个函数完全是多余的,因为VB可以直接计算某个数的n次方,比如
Print 2^3
即可实现上述同样的效果
这个函数应该实现的是a的m次方
所以,从1到m循环实现a累计乘了m次,值赋给了tmp。
然后又把这个值赋给了函数xn。