تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] طريقة تحويل نص الى تاريخ
#1
لدى تاريخ بصيغة String
و أرغب فى تحويله الى date
لأن فى كل مرة أحاول أدخلة لقاعدة البيانات DATE يقول لى فى رسالة خطأ :
Conversion from string " 13/ 3/ 2016" to type 'Date' is not valid

محتاج رأيكم
الرد
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته
PHP كود :
Dim strDate As String TextBox1.Text
        Dim MyDate 
DateTime.ParseExact(strDate"dd-MM-yyyy"Nothing)
        
TextBox2.Text MyDate 

نرجو من الأخ الكريم إرسال مشروع مصغر عن الفكرة للتعديل عليه وشكرا.
إسرائيل إلى زوال ...  وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة:
#3
أخى العزيز  khodor1985 
خالص التقدير لك
الموضوع كله كما ترى بالصورة 3 متغيرات :
( واحد لليوم  (Str(day_Renamed  .....   و الثانى للشهر (Str(mth .....  و  الأخير للسنة (Str(yr  )
و طبعا كلهم string ...
المطلوب كما ذكرت اذاى أحولهم الى تاريخ SHORTDATE
طبعا وضعت الكود اللى تكرمت و أرسلته هنا فى مشاركتك لكن للأسف لم يعمل كما فى الصورة

الرد
تم الشكر بواسطة:
#4
نعم صحيح، لقد وقعت في الفخ، لم تعدل على الـ Format
تنسيق التاريخ في المتغير الأول StrDate يحتوي على "/"
أما في المتغير الثاني MyDate يحتوي علي : "-"

التعديل على الكود :
PHP كود :
Dim StrDate as string str(day_Renamed) & "/" str(mth) & "/" str(yr)
Dim MyDate DateTime.ParseExact(StrDate,"dd/MM/yyyy",Nothing)
Label17.Text MyDate 

أتمنى لك التوفيق
إسرائيل إلى زوال ...  وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة:
#5
أخى العزيز ... تعبتك معى
لكن أنظر الصورة الحالية ... واضح أنه لا يوجد حل !!!!!!!!!!!!
الرد
تم الشكر بواسطة:
#6
الأكواد :
PHP كود :
Dim strDate As String txtDay.Text "/" txtMonth.Text "/" txtYear.Text
        Dim MyDate 
DateTime.ParseExact(strDate"dd/MM/yyyy"Nothing)
 
       txtDate.Text MyDate 

النتيجة :
   

المرفق :

.rar   khodor1985 - ConvertDate.rar (الحجم : 72.7 ك ب / التحميلات : 53)

وهذه طريقة ثانية :
PHP كود :
Dim StrDate As String str(Day_Renamed) & "/" str(mth) & "/" str(yr)
Dim MyDate DateTime.Parse(StrDate)
Label17.Text MyDate 
إسرائيل إلى زوال ...  وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة:
#7
أخي الفاضل :

جرب الكود التالي :

 في قسم التصريحات ضع

كود :
Imports System.Globalization

ثم اكتب الكود في العمليات كالآتي :


كود :
Dim strDate As String = TextBox1.Text
       Dim MyDate = DateTime.ParseExact(strDate, "d/M/yyyy", CultureInfo.CurrentCulture)
       TextBox2.Text = MyDate
الرد
تم الشكر بواسطة: khodor1985 , khodor1985
#8
السلام عليكم...

لماذا لا تستعمل الدالة DateSerial مع المتغيرات مباشرةً...

PHP كود :
Dim MyDate As Date DateSerial(yrmthDay_Renamed)
Label1.Text MyDate

' أو

Dim MyDate As Date = DateSerial(yr, mth, Day_Renamed)
Label1.Text = MyDate.ToString("dd/MM/yyyy") 

نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
الرد
تم الشكر بواسطة: khodor1985 , khodor1985
#9
PHP كود :
dim date1 as date = new date txtYear.Text txtMonth.Text txtDay.Text
الرد
تم الشكر بواسطة: khodor1985 , khodor1985
#10
http://vb4arb.com/vb/thread-14118.html
اسم معرفي : محمد يحيى
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] تحويل اسم من جدول الى جدول اخر komar 1 25 منذ 2 ساعة مضت
آخر رد: عبد العزيز البسكري
  [سؤال] تحويل مشروع فيجوال بيسك الى برنامج exe Simo1991 1 51 اليوم, 01:43 AM
آخر رد: محمد كريّم
  [سؤال] طريقة البحث ابو يوسف النواوي 2 1 75 أمس, 08:03 PM
آخر رد: Awad Issa
  طريقة عمل موقع على النت salah mansour 0 30 15-12-18, 11:44 PM
آخر رد: salah mansour
  مطلوب كود بسيط تحويل القريد فيو في الوورد نور الهدى الهدى 3 79 10-12-18, 08:43 PM
آخر رد: نور الهدى الهدى
  ما طريقة عرض العملاء الغير مسددين لشهر mahmoud.3com 2 86 08-12-18, 11:18 AM
آخر رد: elgokr
Heart سؤال عن حساب السن (العمر) عن طريق تاريخ الميلاد ahmadpal 10 189 07-12-18, 04:52 PM
آخر رد: ahmadpal
  مساعدة في تحويل مشروع فيجوال 6 samira20 6 145 29-11-18, 09:56 PM
آخر رد: asemshahen5
  [VB.NET] طريقة ارفاق ملفات الى قاعدة بيانات access aak505 5 1,612 22-11-18, 01:50 PM
آخر رد: حريف برمجة
  [سؤال] تحويل مشروع من 2017 الى 2008 assem 2 71 21-11-18, 05:42 PM
آخر رد: elgokr

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


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