如何定义一个可以含有浮点数（小数）的数组

Dim A(1 To 20) As Single
定义了一个包含 20 个元素的单精度数据数组。
浮点数包括单精度数据（Single）和双精度数据（Double），都是可以存储小数（当然也可以存储整数）数据的数据类型，存储的数据大小不同而已。
对于动态数组的声明与设置下标：
Dim A() As Double   '声明一个双精度动态数组。
ReDim A(1 To 30)    '设置动态数组的下标，包含 30 个双精度数据元素。