Dim N1 As Float =345.34567
    Dim s As String = NumberFormat(N1, 1, 2)
    Log(s)  '345.35
    
    Dim s As String =NumberFormat2(N1,1,2,2,False)
    Log(s)  '345.35
    
    Dim s As String = NumberFormat(Ceil(N1*100)/100, 1, 2)
    Log(s)  '345.35
    
    Dim s As String = NumberFormat(Floor(N1*100)/100, 1, 2)
    Log(s)    '345.34  ' here is the answer the OP wants