Ciao raga
mi serve un mano per capire dove toppo
devo fare una divisione con numeri float, ed evitare la divisione se un numero è 0
Public Btc As Float
Dim Opg as Float
Dim Parcella as String
Opg = 85
IF Btc <> 0 Then
Parcella = (Opg/Btc) * 1.22
End If
Il problema è che a Volte Btc è inferiore a 0, Tipo 0,852 e non entra nell'IF
???
Non mi pare che 0,852 sia inferiore a 0....... semmai è inferiore a 1. :-X
Ad ogni modo, provando questo codice:
Public Sub Main()
Dim Btc As Float
Dim Opg As Float
Dim Parcella As String
Opg = 85
Btc = 0.852
If Btc <> 0 Then
Parcella = CStr((Opg / Btc) * 1.22)
End
End