44问答网
所有问题
用vb设计工程,已知圆的半径R,求圆的面积S? 用什么控件和代码
如题所述
举报该问题
推荐答案 2013-11-05
就用一个命令按钮。代码:
Private Sub Command1_Click()
Dim r As Single, s As Single
r = Val(InputBox("请输入圆的半径;"))
s = 3.14 * r * r
Print s
End Sub
温馨提示:答案为网友推荐,仅供参考
当前网址:
http://44.wendadaohang.com/zd/6WZRZWVWKVG3YKDVK3.html
相似回答
如何利用
VB
编程,输入
圆的半径,
计算并输出
圆的面积
。
答:
1、打开
vb,
选择左边工具栏的commandbutton。2、在窗体上拖出一个按钮,更改上面的文字为“单击输入半径”。3、双击按钮,在弹出的code代码窗口中,输入如下代码。4、选择工具栏中的启动按钮进行调试。5、单击按钮,会弹出一个对话框,在里面输入半径3。6、会在窗体上打印出计算出
的面积
的值。
VB
中如何写程序
代码
计算
圆的面积
答:
本例子将通过圆周率的值和用户输入的
圆的半径,
计算出
圆的面积
。1、在工具箱中找到对应的
控件,
然后在窗体上适当的位置进行绘制。2、接下来我们开始编写计算按钮的单击事件。首先先定义两个变量
r和s,r
是半径
,s
是面积。3、接下来定义一个Pi的常量,默认值设置为3.14。4、接下来我们开始编写代码。(...
用VB
程序
求圆的面积
答:
Dim s As Single '定义
面积S
为单精度(变量)r = InputBox("输入r") '
半径r
通过inputbox函数输入值 s = PI * r ^ 2 '用
求圆面积
公式,并把值赋给S Print s '在窗体上打印出S的值 End Sub
VB
题目是计算
圆的面积,
编程该怎么写
答:
试试这个:Private Sub Form_Load()Dim
r,
s
As Long r = Val(InputBox("请输入
圆的半径
", "计算
圆的面积
", 1))s = 3.14 * r * r Print "圆的面积是:"; s End Sub
大家正在搜
用半径为R的圆弧连接两已知直线
已知圆的半径为R
已知一半圆环半径为R
已知半径为R的载流圆线圈
已知半径为R无限长圆柱面
已知△ABC外接圆半径为R
已知地球的半径为R
已知均匀带电球面半径为R
已知圆弧形闸门半径为R挡水深度H
相关问题
用VB程序求圆的面积
利用VB做道题:已知圆的半径r(cm),求圆的面积A;
【VB程序】设计程序,要求输入圆半径的值,求出圆的面积。 以...
VB中已知圆的半径求圆的周长和面积,求代码
VB作业 作业:输入圆的半径,计算圆面积和圆周长。计算结果数...
VB程序根据输入的圆半径r求直径周长面积球体积球面积怎么写程...
vb中输入圆的半径r,利用单选按钮选择计算圆的面积、圆的周长...
在VB中编写一个function过程,求圆的面积(圆的半径作...