Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        'Deve vorificare che non sia vuota il valore se no da errore in Single.Parse()
        If (txtSanzione.Text.ToString() = "") Then
            txtSanzione.Text = 0
        End If

        Dim valoreSanzioneInserito As Single
        valoreSanzioneInserito = Single.Parse(txtSanzione.Text.ToString(), New System.Globalization.CultureInfo("en-US"))
        Dim intValue As Integer = recuperaRataFascia(valoreSanzioneInserito)
        If (intValue <> -1) Then
            lbRata.Text = recuperaRataFascia(valoreSanzioneInserito)
        Else
            lbRata.Text = ""
        End If
        'Console.WriteLine(recuperaRataFascia(valoreSanzioneInserito))
    End Sub