03-03-15, 01:04 PM
كود :
Dim CurruntCulture = Globalization.CultureInfo.CurrentCulture
Dim DayName As String = CurruntCulture.DateTimeFormat.GetDayName(DateTime.Parse(Date.Now).DayOfWeek)
TextBox1.Text = DayNameبالتوفيق

