15-10-18, 09:38 PM
السلام عليكم اخي محمد
عرض اسم اليوم بالعربي تفضل هذا الكود تعديل بسيط على كود أخي عبد العزيز والله الموفق
كود :
Imports System.Globalization
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim HijriDTF As New System.Globalization.CultureInfo("ar-SA", False)
Dim dt As DateTime = DateTime.Now
TextBox1.Text = dt.ToString("dddd", HijriDTF)
End Sub
End Classاعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات
