Question

VB 如何将整数型数据类型转换成单浮点数据类型

Answer 1

VB使用CSng 函数可将整数型数据类型转换成单精度浮点数据类型。

CSng 函数示例

本示例使用 CSng 函数将一整型数值转换为 Single。

Private Sub Command1_Click()
    Dim MyInteger As Integer
    Dim MySingle As Single
    MyInteger = 7534
    MySingle = CSng(MyInteger)
    Debug.Print MySingle
    Debug.Print LenB(MyInteger)
    Debug.Print LenB(MySingle)
End Sub

Debug.Print LenB(MyInteger)输出为2，是Integer数据类型的字节数。
Debug.Print LenB(MySingle)输出为4，是Single数据类型的字节数。

Answer 2

用 Csng()函数即可。