VBA实训项目

实训项目2.1：常量、变量、变量作用域

实训目的：掌握常量、变量的命名规则，掌握如何声明常量与变量，掌握变量作用域

实训内容：定义字符变量Name、日期变量Birth、整型Age，变量赋值为John、14/03/1998，在立即窗口输出Rain32 is 21 years old。
以下是VBA代码：

Public Sub abc()
Dim name As String
Dim birth As Date
Dim age As Integer
name = "Rain32"
birth = "1998-3-14"
age = Year(Now()) - Year(birth)
Debug.Print name &