Private Function xn(a As Single, m As Integer)Dim i As Integertmp = 1For i = 1 To mtmp = tmp*aNextxn= tmpEnd Function為什么要1到m循環？為什么tmp = tmp*a？為什么 xn= tmp？不明白這個函數是怎么用的，請大俠們幫忙
2 回答
慕蓋茨4494581
TA貢獻1850條經驗 獲得超11個贊
慕斯709654
TA貢獻1840條經驗 獲得超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
即可實現上述同樣的效果
添加回答
舉報
0/150
提交
取消