[أبو يزن]

صحيح اخواني هذا اذا استخدمت تايمبكير غ الفورم بس انا اصلا مو مستخدم هذه الأداة ابدا

استخدمت هذا الكود

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click


Dim HCal As New System.Globalization.HijriCalendar
Dim dt As DateTime = DateTime.Now
Dim ci As New System.Globalization.CultureInfo("ar-SA")

'===== TextBox39 will take date to day

TextBox39.Text = dt.ToString("dd", ci)

'===== TextBox40 will take date to momth

TextBox40.Text = dt.ToString("MM", ci)

'===== TextBox41 will take date to day

TextBox41.Text = dt.ToString("yyyy", ci)