圆的直径怎么算(VB快捷计算圆的直径、周长、面积程序)

圆的直径怎么算

大家好，今天我们共同来学习如何用VB编程来计算圆的直径、周长、面积程序。

用到的VB知识点有
1VB常量及变量的应用；
2根据程序功能，定义适当的VB数据类型；
3VB算法、选择结构、事件的综合应用。
VB需要掌握的基础知识
1、圆的直径=2*半径；2、圆的周长=π*直径=π*2*半径；3、圆的面积=π*半径^2。
窗体界面图

VB代码实现
‘===============================VB学习编写===========================================Option ExplicitConst pi As Single = 3.14 ‘定义圆周率常量PIDim r As Single, d As Single, c As Single, s As Double ‘定义半径、直径、周长、面积Private Sub Command1_Click() ‘单击计算 r = Val(Text1) ‘将文本框输入的值赋值给变量r If Option1.Value = True Then ‘选中直径按钮 d = 2 * r Label1.Caption = “直径为：” & d ElseIf Option2.Value = True Then ‘选中周长按钮 c = 2 * pi * r Label1.Caption = “周长为：” & c ElseIf Option3.Value = True Then ‘选中面积径按钮 s = pi * r * r Label1.Caption = “面积为：” & s Else MsgBox “请选择计算的种类！” ‘任何按钮都未选中，则给出警告提示，不计算 End IfEnd Sub

实际运行图

计算周长

计算面积

END

学习VB中有遇到问题可添加下图小编微信号。

圆的直径怎么算相关文章