Simone输入圆柱体底面的半径R，和高H，输出其表面积S和体积V 用VB
的有关信息介绍如下：
Private Sub Command1_Click() r = Val(InputBox("输入圆柱体底面的半径R")) h = Val(InputBox("输入圆柱的高H")) s = 3.14159 * r * 2 * h + 3.14159 * r * r * 2 V = 3.14159 * r * 2 * h MsgBox "圆柱体的表面积S=" & s & vbCrLf & " 体积V=" & VEnd Sub'请参考。
