Привожу фрагмент кода и результаты:

Dim dblX As Double
Dim dblY As Double
Dim dblZ As Double
Dim strS As String
Dim lngN As Long


dblX = 2.135
dblY = Int(dblX * 100# + 0.5) ' dblY = 213 ???
dblZ = Fix(dblX * 100# + 0.5) ' dblZ = 213 ???
lngN = dblX * 100# + 0.5 ' lngN = 214
strS = Str(dblX * 100# + 0.5) ' strS = 214

MsgBox "Y = " & dblY & " Z = " & dblZ & _
" N = " & lngN & " S = " & strS

И не могу понять, то ли так должно быть, то ли нет?!
У меня Win95, Win98 и A97.
Попробуйте плз, кто может, этот код.
Какие будут результаты.

Глюк VBA
Смотри тут:
http://www.hiprog.com/forum/forum.asp?action=goto&id=2
Функции Int и Fix