如何利用VB编程,输入圆的半径,计算并输出圆的面积.单击命令按钮,调用InputBox函数输入数据,通过MsgBox显示计算结果.

题目

如何利用VB编程,输入圆的半径,计算并输出圆的面积.单击命令按钮,调用InputBox函数输入数据,通过MsgBox显示计算结果.

答案

Public Sub command1_click( )
dim r as integer
r=val(inputbox("请输入半径"))
s=3.1415926*r^2
msgbox "圆的面积为:"&s
end sub