作业帮 > 数学 > 作业

VB 输入 半径 计算圆的周长和面积公式

来源:学生作业帮 编辑:拍题作业网作业帮 分类:数学作业 时间:2024/04/27 15:53:15
VB 输入 半径 计算圆的周长和面积公式
计算及清空公式
他们的答案好像都没有输出结果.
Dim r, s, c As Integer
Private Sub Command1_Click()
r = Val(Text1.Text)
s = 3.1415926 * r ^ 2
c = 2 * 3.1415926 * r
Label1.Caption = "周长是:" & c
Label2.Caption = "面积是:" & s
End Sub
Private Sub Command2_Click()
Text1.Text = ""
Label1.Caption = ""
Label2.Caption = ""
End Sub