[VB6] Confronto di variabili Double

[jackmoros]

salve,
vorrei sottoporvi il seguente codice:

Private Sub Command1_Click()
    Dim actual As Double
    Dim expected As Double
    Dim expected1 As Double
    Dim expected2 As Double
    
    actual = 0.1
    expected1 = 0.09
    expected2 = 0.01
    expected = expected1 + expected2
    
    If actual <= expected Then
        MsgBox "ciao"
    End If
    
End Sub

dove si fa un confronto tra double, come si vede, la variabile expected viene posta pari alla somma di expected1 e expected2, ovvero 0.1, quindi il confronto con actual, che vale 0.1, dovrebbe tornare true, mentre torna false!
Qualcuno sa come mai, e come ovviare al problema?