【VBA研究】VBA数据类型定义与效果

作者：iamlaosong

数据类型是对同一类数据的统称，如文本、日期、数值等。VBA里的数据类型有：字节型（Byte），整数型(Integer），长整数型（Long），单精度浮点型（Single），双精度浮点型（Double），货币型（Currency），小数型（Decimal），字符串型（文本型）（String），日期型（Date），布尔型（Boolean）。 VBA对数据类型的管控并不强，有一个Variant万金油类型，这种类型的变量干啥都行。此外，用Dim定义类型时，存在一个陷井，稍不注意就会掉落其中。

1、测试结果

通过测试发现，如果一条语句定义多个变量，只有最后一个变量有效果，比如下面的程序是不会报错的，也能实现其功能：

Sub tt()
    Dim ss, a, b, c, d As Integer
    a = 100
    b = 200
    c = a + b
    ss = "sum=" & c
    
    Cells(5, 1) = a
    Cells(5, 2) = b
    Cells(5, 3) = c
    Cells(5, 4) = ss
    
    a = 87654
    b = 12348
    c = a + b
    ss = "sum=" & c
    
    Cells(5, 5) = a
    Cells(5, 6) = b
    Cells(5, 7) = c
    Cells(5, 8) = ss
    
End Sub

执行结果是正常的：

100

200

300

sum=300

87654

12348

100002

sum=100002

不过，如果定义写成：Dim ss, a, b, c As Integer，则会报“溢出”错误（c是整型）。

同样，如果定义写成：Dim a, b, c, ss As Integer，则会报“类型不匹配”错误（ss是整型）。也就是说，只对定义中最后一个变量进行管控，这一点从C语言转过来的人有点想不通。

2、真实含义

实际上Dim a, b,c,ss As Integer的意思是:

dim a, dim b, dim c, dim ss as integer

变量a、b、c没有类型说明，那么VB就会给你使用默认的类型Variant。

3、严格管控

要严格的进行变量类型管控，一次只能定义一个变量，也可以写成下列形式：

Dim a As Integer, b As Integer, c As Integer, ss As String

===========================