今天，我们结合一个具体的VB程序，来讲解一下如何按照既定要求完成一个VB程序。

首先，今天讲解的程序要实现的功能是：

在文本框中输入半径，然后点击求直径、周长、面积单选按钮，则可以把相应的计算结果显示到标签中。

经过分析，我们可以知道用到的VB编程知识有：常量、变量的定义与使用，IF选择结构语句的正确使用，VB表达式与语句书写的规则等。

首先，根据需要添加相应控件。

添加控件如下图

控件添加到窗体上的界面

程序分析与实现：

我们知道，由圆的半径，可以很快的利用计算公式得到圆的周长、面积等。

因此，我们根据公式，按照VB语句规则写代码就可以了。

OptionExplicit

ConstpiAsSingle=3.14定义圆周率常量PI

DimrAsSingle,dAsSingle,cAsSingle,sAsDouble定义半径、直径、周长、面积

PrivateSubCommand1_Click()单击计算

r=Val(Text1)将文本框输入的值赋值给变量r

IfOption1.Value=TrueThen选中直径按钮

d=2*r

Label1.Caption="直径为："d

ElseIfOption2.Value=TrueThen选中周长按钮

c=2*pi*r

Label1.Caption="周长为："c

ElseIfOption3.Value=TrueThen选中面积径按钮

s=pi*r*r

Label1.Caption="面积为："s

Else

MsgBox"请选择计算的种类！"任何按钮都未选中，则给出警告提示，则不计算

EndIf

EndSub

计算结果图

总结：最初进入VB工程界面时，呈现给我们的是一个空白的窗体，要实现什么样的功能及效果，完全由我们来决定，这就如图美术大师手中的一张张作品一样，最初是完全空白的，经过艺术的点缀以及加工和画龙点睛，最后整个界面显得活灵活现、让人为之震撼！

VB编程实现的结果也是如此，当我们看到经过自己编写的程序，运行后得到自己想实现的效果，内心一定是无比激动与高兴的。

为了帮助正在学习VB编程的朋友在短时间内高效掌握VB编程，少走弯路与节省宝贵的学习时间。由VB老师历时半年多，精心讲解的VB从入门到综合全套视频教程优惠发放了！

VB从0基础到精通全套视频讲解，每节视频都是在基本知识讲解的前提下，结合实际应用程序，代码一句一句详细讲解。同时视频配有同步的课件教程、编程实例（可以直接运行），每节都穿插了大量的学习技巧和编程经验，避免走弯路，让你高效率的快速学习VB。

学习VB中有问题可以长按识别下图添加老师，学习问题在线答疑。