' Collection of code snippets by Arne Vajhøj ' posted to eksperten.dk, usenet and other places (2002-now) Imports System.Globalization Public Partial Class MainForm Public Sub New() InitializeComponent() End Sub 'Private Const loc As String = "en-US" Private Const loc As String = "da-DK" Sub Button1Click(sender As Object, e As EventArgs) Dim v1 As Double = Double.Parse(textBox1.Text, New CultureInfo(loc, False)) Dim v2 As Double = Double.Parse(textBox2.Text, New CultureInfo(loc, False)) Dim res As Double = v1 / v2 textBox3.Text = res.ToString("n", New CultureInfo(loc, False)) End Sub End Class Public Class MainClass Public Shared Sub Main Dim mf As New MainForm mf.ShowDialog() End Sub End Class