تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
Time Split
#1
احتاج الى تفرقة اليوم السنة الشهر و الساعة الدقيقة و الثواني


كود :
       Dim x As String = "11/23/2017 4:16:42 AM"
       Dim list As New ArrayList
       list.AddRange(x.Split("/"c))
       list.AddRange(x.Split(":"c))
       MsgBox(list(5))

هذا الكود يعطي قيمة خاطئة هل من حل ؟
الرد }}}
تم الشكر بواسطة:
#2
تفضل التعديل

Dim x As String = "11/23/2017 4:16:42 AM"   ' DateTime
Dim s() As String = x.Split     ' Split
Dim list As New ArrayList   ' ArrayList
list.AddRange(s(0).Split("/"c)) ' Date array
list.AddRange(s(1).Split(":"c)) ' Time array
list.Add(s(2))  ' AM , PM
MsgBox(list(5))     ' Message
الرد }}}
تم الشكر بواسطة: sendbad100 , Mohamed20
#3
عليك قراءة التاريخ كتاريخ و ليس String
ومنه تستطيع الحصول علي اليوم و الشهر و السنة و الساعة و الدقيقة و الثواني
Retired
الرد }}}
تم الشكر بواسطة: sendbad100 , Mohamed20
#4
(27-11-17, 08:44 AM)ﻣﺒﺘﺪﺉ كتب : تفضل التعديل

Dim x As String = "11/23/2017 4:16:42 AM"   ' DateTime
Dim s() As String = x.Split     ' Split
Dim list As New ArrayList   ' ArrayList
list.AddRange(s(0).Split("/"c)) ' Date array
list.AddRange(s(1).Split(":"c)) ' Time array
list.Add(s(2))  ' AM , PM
MsgBox(list(5))     ' Message
جزاك الله خير اخي
(27-11-17, 01:59 PM)silverlight كتب : عليك قراءة التاريخ كتاريخ و ليس String
ومنه تستطيع الحصول علي اليوم و الشهر و السنة و الساعة و الدقيقة و الثواني
جزاك الله خير اخي
الرد }}}
تم الشكر بواسطة: ﻣﺒﺘﺪﺉ



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم