+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تفريغ اداة datetimepicker (/showthread.php?tid=21163)
الصفحات:
1
2
RE: تفريغ اداة datetimepicker - جميل علي - 25-07-17
تفضل المشروع بعد التعديل
RE: تفريغ اداة datetimepicker - Marwan9990 - 25-07-17
ربي يعطيك العافيه عزيزي
الي عوده باذن الله بعد التجربه
RE: تفريغ اداة datetimepicker - Marwan9990 - 25-07-17
عزيزي جميل علي المثال الي ارفقته انته وعدلت عليه لا يعطي المطلوب منه ..
انه يحذف القيم ف الاداه صحيح ولكن لو اخترت اداه ام لم تختار فهو لا يضيف لك اي نتائج في قاعدة البيانات ..
بمعنى تعديلك يجعله فارغ ب استمرار حتى لا يستطيع المستخدم اختيار تواريخ حتى لو حاول
RE: تفريغ اداة datetimepicker - Marwan9990 - 25-07-17
مساء الورد وريحان ل قلوبكم
عزيز الاستاذ جميل علي اشكر لك محاولتك ل مساعدتي ربي يرزقك جنات النعيم حبيبي ..
تم ايجاد الكود المناسب ..
الكود التالي للفائده هو حل تفريغ اداة التاريخ اضعه لتعم الفائده للجميع ..
كود :
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
DateTimePicker1.Format = DateTimePickerFormat.Custom
DateTimePicker1.CustomFormat = " "
End Sub
Private Sub DateTimePicker1_ValueChanged(sender As Object, e As EventArgs) Handles DateTimePicker1.ValueChanged
If DateTimePicker1.Format = DateTimePickerFormat.Custom AndAlso DateTimePicker1.CustomFormat = " " Then
DateTimePicker1.Format = DateTimePickerFormat.Short
End If
End Sub
End Class