[SOLVED] Incorrect value from expression result variable declared as Long

Incorrect value from expression result variable declared as Long

The following code gives the Long type variable "EIa" a value.

I was getting odd results later the code.
When I Debug.Print the variable EIa, I get 0.
If I Debug.Print the expression that defines EIa, I get the expected value.

'Calculate mA1:
'****************************************************************************************************
EIa = Etimber * ImatA / (Etimber * (ImatA + ImatB + ImatC + ImatD))
Debug.Print "EIa = "; EIa
Debug.Print "EIa = "; Etimber * ImatA / (Etimber * (ImatA + ImatB + ImatC + ImatD))
mA1 = 12 * 0.5 * (q1PSF * EIa) * bMat * LcantiA ^ 2 '12 puts this into lb-in
If LmatSymA = 0 Then
    fbA1 = 0
Else
    fbA1 = (mA1 * (0.5 * tMatA) / ImatA)
End If

Solution

The result of the expression is a kind of fractional, floating point number, but since you defined EIa as Long (a large integer), it gets truncated to zero upon assignment. See Visual Basic Data Types.