Setting Region and language on VB.NET

Salah satu permasalahan yang sering kita temui sebagai programmer dalam merancang program yang berhubungan dengan nominal adalah masalah di settingan regional komputer kita, kenapa? jika settingan regional komputer kita adalah Indonesian maka yang menjadi pemisah ribuan (.) dan pemisah desimal (,) bertolak belakang dengan English yang menjadi pemisah ribuan (,) dan pemisah desimal (.)

Hal ini akan menjadi permasalahan saat menyimpan nilai nominal ke dalam database nilai yang seharusnya dalam settingan Indonesian bernilai 3.000  (tiga ribu rupiah) dalam settingan English akan disimpan menjadi 3 (3 rupiah) karena (.) dianggap sebagai pemisah desimal.

Solusinya sewaktu kita menjalankan program, Kita lakukan pengecekkan settingan regional komputer jika settingan regional tidak sesuai program tidak bisa dijalankan, Berikut code untuk melakukan pengecekkan:

 Dim sc As String  
 sc = (System.Threading.Thread.CurrentThread.CurrentCulture.ToString)  
 If sc <> "id-ID" Then  
      MessageBox.Show("Anda harus merubah settingan region dan language ke Indonesian", "Check Region And Language", MessageBoxButtons.OK, MessageBoxIcon.Information)  
      System.Diagnostics.Process.Start("intl.cpl")  
      End  
 End If  

Selamat mencoba.