问题: 设计一个程序计算圆的面积，输入一个任意数的为圆的半径，计算圆的周长和面积并输出。
计算圆的面积：s=πrr
计算圆的周长：l=π2r

示例演示

上一节我们学习了控件和输出的两种方法，按照上一节的思路，我们的程序是：

Private Sub Command1_Click()
Print "圆的面积是:" & Val(Text1.Text) * Val(Text1.Text) * 3.14159
Print "圆的周长是:" & Val(Text1.Text) * 2 * 3.14159
End Sub

这个程序可以实现前面问题的解决，但是在程序运行的时候，Val(Text1.Text),3.14159等，每一个数据，都需要在内存中开辟一个临时空间，然后用于计算，重复使用的次数越多，就越浪费空间，并且代码看起来很不友好，为解决这一问题，我们可以将这些数据在使用前提前规划好他的数据类型和储存空间，这就是这两节我们要讲的内容。

变量、常量、数据类型

观察发现，圆的半径是根据每次输入变化的，而圆周率始终保持不变。如果一个存储空间中存储的数据在程序运行的过程中可以改变，我们把它叫做变量，例如，计算圆面积中圆的半径，是根据输入变化的，就可以把它定义为变量；如果在程序进行过程中不变的量叫做常量，例如圆周率，在计算过程中始终保持不变，可以把它定义为常量。他们是什么数据类型呢，圆的半径是一个任意数，可以使整数，也可以是小数，我们可以把它定义为single，同理，根据计算出来的面积和周长，也可以是小数，定义为single，圆周率一般取值3.14159，定义为single。

拓展：
描述数值型数据的数据类型：(整型)Integer、（长整型）Long、（单精度型）Single、（双精度型）Double。区别在于存储范围的大小。
整型:Integer (-32768 —— 32767，存储为 16 位，2 个字节)
长整型:Long(-21亿 —— 21亿，可以表示人口数量)

程序需要3个变量，分别是，圆半径r,圆面积s，圆周长l。

变量声明的方法：
Dim <变量名 >As <变量类型>
如：Dim  r  As  single 定义一个单精度变量，变量名为r。
变量的赋值
变量 = 表达式

程序中，圆周率是常量，它的声明格式是：

常量声明的方法：
声明：Const 常量名 [As 常量类型] = 常量值
如：Const  PI  As  Single = 3.14159  常量名为PI，数据类型是单精度

下面我们可以优化我们之前的程序：
Private Sub Command1_Click()

Dim r As Single
Dim s As Single
Dim l As Single
Const PI As Single = 3.14159

r = Val(Text1.Text)
s = PI * r * r
l = PI * 2 * r

Print "圆的面积是:" & s
Print "圆的周长是:" & l
End Sub

我们看到代码的编写分为变量的声明、计算和结果输出三部分。后面的程序我们要这样的模式来写。另外在声明变量的时候，变量名是否可以随意命名呢？须遵循一定的规则：

变量命名注意要点：
1、必须以字母开头,不能以数字或其他字符开头。
2、只能由字母、数字或下划线组成，不能含有小数点、空格等字符。
3、最长不超过255个字符
4、不能以VB保留字作变量名，如语句定义符、函数名等。（避免歧义）
5、VB不区分变量名中字母大小写。如HELLO和Hello是同一个变量。