Dim s As String
s = Threading.Thread.CurrentThread.CurrentCulture.NumberFormat.NumberDecimalSeparator
MessageBox.Show(s)
Dim s As String
s = Threading.Thread.CurrentThread.CurrentCulture.NumberFormat.NumberDecimalSeparator
MessageBox.Show(s)