作业帮 > 综合 > 作业

输入圆柱体底面的半径R,和高H,输出其表面积S和体积V 用VB

来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/06/05 04:20:31
输入圆柱体底面的半径R,和高H,输出其表面积S和体积V 用VB
输入圆柱体底面的半径R,和高H,输出其表面积S和体积V
输入圆柱体底面的半径R,和高H,输出其表面积S和体积V 用VB
界面:4 个标签,4个文本框,2个命令按钮(网络不给力,传不上图)
代码:
Private Sub Command1_Click()
Dim r, h, s, v As Single
Const Pi = 3.1415926
r = Text1
h = Text2
s = 2 * Pi * r * r + 2 * Pi * r * h
v = Pi * r * r * h
Text3 = s
Text4 = v
End Sub
Private Sub Command2_Click()
Unload Me
End Su