Как сделать, чтобы символ разделения дробей подстраивался под региональные настройки

if isnumeric(0.5) then
' сепаратор точка
else
' сепаратор запятая
end if

if isnumeric(0.5) then
' сепаратор точка
else
' сепаратор запятая
end if

Public Class Form1
    Friend MyNDS As String ' тут будем хранить значение разделителя. Хотя всегда можно получить его из My.Computer.Info.InstalledUICulture.NumberFormat.NumberDecimalSeparator
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        MyNDS = My.Computer.Info.InstalledUICulture.NumberFormat.NumberDecimalSeparator ' присвоим переменной MyNDS значение строки-разделителя
    End Sub
 
    ' это в рабочей проге не надо, просто демонстрация
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox(MyNDS) ' посмотрим, какой знак разделителя
        MsgBox(IsNumeric("1" & MyNDS & "7")) ' ну и удостоверимся, что это он
    End Sub
End Class

Case "x_layer"
ChangesPlateLength_TextBox.Text = CSng(a(1) * 1000)
Case "y_layer"
WidthCeckLength_TextBox.Text = CSng(a(1) * 1000)