[المبرمج الطموح88]

يمكنك عمل ذلك بهذه الطريقة ايضا

كود :

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

       TextBox1.Text = dt.ToString("dddd", ci)