Question

VB编写程序 用来计算m的n次方

其中m，n由用户输入 输出在窗体上 要求将计算m的n次方写成函数

Answer 1

新建工程，添加command1控件。vb6.0+xp调试成功。

代码如下：

Dim n As Integer。

Private Sub Command1_Click()。

m = InputBox("请输入内底数m")。

n = InputBox("请输入指容数n")。

扩展资料

VB编写程序的参数选择（有利于方便用户的工作进度）

第一个按钮的Index属性值默认为“0”，第二个的Index属性值自动设为“1”，并且大小与第一个按钮相同，只需修改其 Caption 属性为数字“1”并将其拖至合适位置即可。

此后继续使用“粘贴”的方法建立其他控件组中其余按钮，共20个按钮，每建立一个，就将它拖到合适处，并修改相应的Caption属性值。

Answer 2

新建工程，添加command1控件。vb6.0+xp调试成功
代码如下：
Dim n As Integer

Private Sub Command1_Click()
m = InputBox("请输入底数m")
n = InputBox("请输入指数n")
Print Js(m, n)

End Sub

Private Function Js(a As Double, b As Integer)
Js = a ^ b
End Function