تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مشكلة عند تحويل من string الى Date
#1
السلام عليكم ورحمة الله وبركاته
عندما اكتب تاريخ في textbox ثم احوله الى من نوع Date  لاني احتاجه للتعامل مع دوال التارريخ لاكتشاف الفرق مثلا..تظهر هذه الرسالة string was not recognized as a valid datetime..وهذا نص الكود الذي كتبته

كود :
Dim s As Integer = Val(TextBox5.Text)
       s = s * -1
هذه الطريقة الاولى

( Dim d1 As Date = Date.TryParseExact(TextBox4.Text.ToString(), "dd/MM/yyyy", Nothing)
            TextBox4.Text = DateAdd("M", s, d1)




هذه الطريقة الثانية   


Dim d1 As Date = CDate(TextBox4.Text.ToString)
       TextBox4.Text = DateAdd("M", s, d1)
الرد
تم الشكر بواسطة:
#2
(12-03-15, 07:02 PM)ameerah كتب : الخطأ عندك فيDateAdd



كود :
Dim d1 As Date = CDate(TextBox4.Text).Date
TextBox4.Text = DateAdd(DateInterval.Month, s, d1)

اخي الفاضل طبقت الحل اعلاه لكن ضهرت لي هذه المشكلة (الصورة بالمرفقات) 
ارجو الرد وفقك الله


الملفات المرفقة صورة/صور
   
الرد
تم الشكر بواسطة:
#3
(12-03-15, 09:57 PM)ameerah كتب : الرسالة بتقول أنه مربع النص لا يحتوي على نص عشان يحوله.
تأكد أنك تكتب في مربع النص اللي اسمه TextBox4

اخي الفاضل انا اكتب في textBox4 لكن دون جدوى 
الرد
تم الشكر بواسطة:
#4
هذه اكوادي التي استخدمها للتعامل مع التاريخ

كود تحويل التاريخ
Dim dat_st As Date = Date.ParseExact(Date_start.Text, "dd/MM/yyyy", Nothing)

اضافة ايام او شهور او سنوات الى تاريخ
Date_end.Text = DateSerial((Now.Year), (Now.Month), (Now.Day) + 7)

بالتوفيق
الرد
تم الشكر بواسطة:
#5
(13-03-15, 02:29 AM)Dr.Sherif Alazizi كتب : هذه اكوادي التي استخدمها للتعامل مع التاريخ

كود تحويل التاريخ
Dim dat_st As Date = Date.ParseExact(Date_start.Text, "dd/MM/yyyy", Nothing)

اضافة ايام او شهور او سنوات الى تاريخ
Date_end.Text = DateSerial((Now.Year), (Now.Month), (Now.Day) + 7)

بالتوفيق


جزيل الشكر اخي الفاضل 
بعد ماقمت بمراجعة الكود بشكل دقيق وكما قلت  لي وجدت بان كلامك جدا صحيح وانا اسف لانني لم انتبه وفقك الله لكل خير ياطيب 
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Photo [VB.NET] حل مشكلة {"This OleDbTransaction has completed; it is no longer usable."} محمد صلاح ابراهيم 0 13 منذ 6 ساعة مضت
آخر رد: محمد صلاح ابراهيم
Exclamation ما هذا ؟ مشكلة في اداة ShockwaveFlash لعرض فيديوهات الـ Youtube YousefOkasha 6 68 أمس, 04:59 PM
آخر رد: YousefOkasha
  مشكلة فى استدعاء الفاتورة للتعديل عليها atef_020 27 371 21-07-18, 10:23 PM
آخر رد: atefkhalf2004
  [VB.NET] كيف يمكن تفادي مشكلة اقلاع البرنامج اكثر من مرة larbihamri 4 85 20-07-18, 03:29 AM
آخر رد: YousefOkasha
  مشكلة ظهور الارقام في تقرير الكريستال ريبورت باللغة الانجليزية محمد صلاح ابراهيم 1 57 15-07-18, 05:07 PM
آخر رد: elgokr
Exclamation مشكلة في تثبيت Visual Studio 2013 YousefOkasha 7 299 13-07-18, 10:33 PM
آخر رد: YousefOkasha
  [سؤال] مشكلة عند عمل رن للمشروع khaled_2017 9 171 13-07-18, 07:32 PM
آخر رد: elgokr
  [سؤال] كيفية تحويل مشروع من c# الى vb.net alims 5 104 12-07-18, 10:53 PM
آخر رد: elgokr
  [VB.NET] مشكلة عند اضافة البيانات للسيرفر محمد اسماعيل 7 99 11-07-18, 04:28 AM
آخر رد: elgokr
  [VB.NET] مشكلة في الكريستال ريبورت فراس الغزي 1 63 09-07-18, 03:00 PM
آخر رد: elgokr

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


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