Problema virgola

 Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra

Tuo_N_Formattato = Replace(TxtTuoNum.Text, ".", ",")

Dim N1 as single = Replace(TxtNumero.Text, ".", ",")

        private void textBox1_KeyDown(object sender, KeyEventArgs e)
        {
            char c = (char)e.KeyValue;

            bool ok = false;
            //--- range di numeri, il punto ed altri casi speciali
            if ((c > 47 && c < 58) 
                || (e.KeyCode == Keys.OemPeriod && !textBox1.Text.Contains(".")) 
                || e.KeyCode == Keys.Back || e.KeyCode == Keys.Delete 
                || e.KeyCode == Keys.Left || e.KeyCode == Keys.Right
                )
                ok = true;


            e.SuppressKeyPress = !ok;

        }