杭州交通信息网靶向药能治好肺癌吗:VB6.0编个小程序~怎么编
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/09 11:46:32
编一个程序，以键盘输入一数，然后打印出该数及它的平方，立方，平方根
Private Sub Command1_Click()
Dim a As Double
a = Val(Text1.Text)
Print a & "的平方为：" & a ^ 2
Print a & "的立方为：" & a ^ 3
Print a & "的平方根为：" & Sqr(a)
End Sub