[محمد بوقزاحة]

السلام عليكم ورحمة الله 
ارجوا مساعدتي في معرف اليوم 
حاولت كم مرة ولكن يطلع باللغة الانجليزية

[عبد العزيز البسكري]

(15-10-18, 11:03 AM)محمد بوقزاحة كتب : السلام عليكم ورحمة الله 
ارجوا مساعدتي في معرف اليوم 
حاولت كم مرة ولكن يطلع باللغة الانجليزية

كود :

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Dim ci As New System.Globalization.CultureInfo("ar-SA")
       Dim dt As DateTime = DateTime.Now
       TextBox1.Text = dt.ToString("dddd", ci)
   End Sub

[محمد بوقزاحة]

شكر اخي الكريم
لكن نفس المشكلة ان اليوم باللغة الانجليزية 
كيف نغيره للغة العربية

[عبد العزيز البسكري]

السلام عليكم و رحمة الله و بركاته

أخي الكريم بالنسبة لي يشتغل الكود بطريقة عادية

أعتقد أنّ المشكلة بالإعدادات الإقليمية لديك

تحياتي

[محمد بوقزاحة]

شكرا اخي الكريم

[ابراهيم ايبو]

السلام عليكم اخي محمد

عرض اسم اليوم بالعربي تفضل هذا الكود تعديل بسيط على كود أخي عبد العزيز والله الموفق

كود :

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