Conversi String2Date

Beberapa hari ini dapat masalah cukup ribet ketika harus mengkonversi aplikasi Data Base CPNS Umum dan Honorer dari tahun 2008 sampe formasi Umum 2009 kemarin yang tadinya menggunakan Microsoft Access ke Microsoft SQL Server 2008. Konversi harus saya lakukan karena aplikasi ini ternyata akan sangat penting untuk dikembangkan lebih lanjut untuk bisa menyimpan data pegawai yang lebih besar, dan mempunyai sistem yang lebih baik dan lebih kokoh.
Tetapi ternyata pemasukan data tanggal di MS SQL Server tidak semudah di Microsoft Access, jadi mau tidak mau saya harus membuat fungsi untuk mengkonversi tanggal umum yang sudah digunakan pada aplikasi yang berformat dd/MM/yyyy ke format MS SQL Server yang mempunyai format string yyyy/MM/dd. Berikut kurang lebih fungsi yang saya buat.

Public Function String2Date(ByVal DateString As String) As Date
        Dim ConvertDate As New Date

        Try
            ConvertDate = DateTime.ParseExact(DateString, "dd/MM/yyyy", System.Globalization.CultureInfo.CurrentCulture, System.Globalization.DateTimeStyles.None)
            Return ConvertDate
        Catch ex As Exception
            MessageBox.Show("Error Converting Date")
        End Try
    End Function

Walau sederhana semoga bermanfaat.