如何利用VB6.0求圆的面积,越简单越好,最好用到按钮、两个文本框、两个标签。
发布网友
发布时间:2022-04-28 16:23
我来回答
共1个回答
热心网友
时间:2023-09-12 09:14
两个文本框text1(输入半径),text2(输出面积),其他略
Private Sub Command1_Click()
Dim r As Single '半径
Dim s As Double '面积
r = Val(text1.Text)
s = 3.1415926 * r ^ 2
text2.Text = s
End Sub追问不是太明白
追答有啥不明白的??