vba17-25

十七 变量默认值 简写变量 常量

1声明变量的同时赋值：
数值：0 字符串："“空字符串 布尔：False 变体：Empty（空）
2 布尔值：false(0) True(1)
所有非0的数字转换成布尔类型都是True
3变量定义简写
dim i % integer整型
dim j& long长整型
#double 小数
$ string 字符串
常数后面加符号，改变常数数据类型
Date Boolean 没有简写
'VBA 声明变量 同时根据变量的数据类型，系统会自动给变量赋初值。
'1、如果声明的变量是数值类型的：整数类型 0 小数类型 0.0
'2. 字符串类型：”" 空字符串
'3. 布尔类型 False
'4. 变体类型 Empty – 空的意思

'布尔类型转成数字没有意义的： False —>0 True —>-1
'所有的非0 的数字都可以转成布尔类型的True 非空的字符串
'VBA 的变量声明的简写方式
'dim 变量名 as 数据类型
'Dim 变量名简写符号

Sub 变量声明的简写()
    Dim i% '==== dim i as integer
    Dim j& '==== dim j as long
    Dim d# '===== dim d as double
    Dim s$ '===== dim s as string
    Dim b As Boolean '没有简写符号
    Dim date1 As Date
    '把常数后面跟上简写符号，改变了常数数据类型
    MsgBox 64 * 64 * 64&
End Sub

'常量：一些表述公理定理常数的量，不变的量。
'特点：一经声明同时进行赋值，然后就不可以在程序中再被赋值改变。
'常量的声明 Const

Sub 求圆面积()
    '3.14115926536
    Dim r As Double
    Const Pi As Double = 3.14115926536
    r = 2.1
    MsgBox Pi * r ^ 2
End Sub

4 常量声明：一经赋值在程序中不可改变，声明同时赋值

Const Pi as double=3.1415926

十八 判断是否闰年
规则：
1 被4整除，