17-10-12, 05:21 PM
كاتب الموضوع : AhmedEssawy
كود :
Dim dateTime As DateTime = New _
DateTime(Now.Year, Now.Month, Now.Day, Now.Hour, _
Now.Minute, Now.Second)
Dim d() As String = Nothing
d = dateTime.GetDateTimeFormats()
ListBox.Items.AddRange(d)