用VB算圆的面积　用一个文本框输入半径　点击按钮以后再另一个文本框得出结果

发布网友发布时间：2022-04-28 16:23

共3个回答

热心网友时间：2023-09-12 09:13

在form1中依次添加2个文本框和1个按钮。然后输入如下代码
Private Sub Command1_Click()
Dim R As Double
If IsNumeric(Text1.Text) Then
R = Val(Text1.Text)
If R > 0 Then Text2.Text = Str(3.14159265 * R * R)
End If
End Sub
运行即可。

热心网友时间：2023-09-12 09:14

建立一个窗口，在文本框中输入一个圆的半径，单击“面积”按钮时，文本框中你需要在文本框输入半径，是要图形界面了？其实用C语言就可以了dos界面输入

热心网友时间：2023-09-12 09:14

1、在窗体中拖出两个文本控件（textbox）和一个命令按钮控件（commandbutton），半径输入框名称为Text1，结果框为Text2，命令按钮名称为Command1；
2、双击命令按钮控件，在弹出代码框内输入以下代码即可；
3、代码：
Private Sub Command1_Click()
Dim r, s As Single
r = Text1.Text
s = 3.14 * r * r
Text2.Text = s
End Sub

用VB算圆的面积 用一个文本框输入半径 点击按钮以后再另一个文本框得出结果

用VB算圆的面积　用一个文本框输入半径　点击按钮以后再另一个文本框得出结果