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

(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