Excel的VBA - 從動態數組獲取值 - 不顯示實數

Question

下面是一些代碼，說明我有這個問題：

Sub main() 
    Dim V() As Long, x As Integer, temp As Long 

    x = 5 

    ReDim V(1 To x) 

    V(4) = 0.65 
    temp = V(4) 

    MsgBox (temp) ' Returns value of 1 
End Sub 

我想變量temp採取值：0.65，但它總是顯示1的值。我不知道我錯過了什麼。任何幫助是極大的讚賞。

Answer 1

您已經聲明Dim V() As Long。這意味着它只需要整數。將其更改爲Double。

Answer 2

temp & V長整數所以不能代表浮點數0.65一樣，簡單地改變他們的類型Double其能。