大家好，今天我们共同来学习如何用VB编程来计算圆的直径、周长、面积程序。
用到的VB知识点有1
VB常量及变量的应用；
2
根据程序功能，定义适当的VB数据类型；
3
VB算法、选择结构、事件的综合应用。
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中有遇到问题可添加下图小编微信号。