If Char.IsDigit(e.KeyChar) = False And e.KeyChar <> "." And AscW(e.KeyChar) <> 8 Then e.Handled = True End I
if(char.IsDigit(e.KeyChar)==false && e.KeyChar!= '.' ) e.Handled = true;