การแปลงวันที่ให้เป็น String ตามรูปแบบที่ต้องการ

การ convert Date String โดยบังคับปี ค.ศ. หรือ พ.ศ. ได้นั้น ทำดังนี้ครับ

Dim d as Date
Dim s as String

d = Date.Parse(s, New CultureInfo("en-GB")) ' บังคับ ค.ศ.
d = Date.Parse(s, New CultureInfo("th-TH")) ' บังคับ พ.ศ.

หรือ

s = d.ToString(New CultureInfo("en-GB")) ' บังคับ ค.ศ.
s = d.ToString(New CultureInfo("th-TH")) ' บังคับ พ.ศ.

ไม่แนะนำให้ใช้ CDate เพราะไม่รู้ว่าเป็น ค.ศ. หรือ พ.ศ.

s = CDate(d).ToString("dd-MM-yyyy")

แต่จะแนะนำให้ใช้

s = d.ToString("yyyy-MM-dd", CultureInfo.CreateSpecificCulture("en-GB"))

(แต่ต้อง Imports System.Globalization ก่อน)