这道VB题怎么解.任务4
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:数学作业 时间:2024/06/17 00:25:21
这道VB题怎么解.任务4
![](http://img.wesiedu.com/upload/f/f1/ff17bce20683fb22c0705598984567a6.jpg)
![](http://img.wesiedu.com/upload/f/f1/ff17bce20683fb22c0705598984567a6.jpg)
![这道VB题怎么解.任务4](/uploads/image/z/16447138-34-8.jpg?t=%E8%BF%99%E9%81%93VB%E9%A2%98%E6%80%8E%E4%B9%88%E8%A7%A3.%E4%BB%BB%E5%8A%A14)
Private Sub Form_Click()
Dim a As Integer
a = InputBox("")
Print a & "的平方:" & Format(a ^ 2, "0.000")
Print a & "的平方根:" & Format(a ^ (1 / 2), "0.000")
Print a & "的立方根:" & Format(a ^ (1 / 3), "0.000")
End Su
Dim a As Integer
a = InputBox("")
Print a & "的平方:" & Format(a ^ 2, "0.000")
Print a & "的平方根:" & Format(a ^ (1 / 2), "0.000")
Print a & "的立方根:" & Format(a ^ (1 / 3), "0.000")
End Su