[تركي قرمزلي]

السلام عليكم و رحمة الله و بركاته

عند ربط textBox بحقل من نوع تاريخ يظهر التاريخ و معه الوقت ، ما العمل إذا أردت إظهار التاريخ فقط

ملاحظة : طريقة الربط

كود :

textbox1.DataBindings.add("Text",Ds1,"Tbl.MyDate")

السلام عليكم و رحمة الله و بركاته

[ismail2012]

اكتب         TextBox1.Text = CDate(TextBox1.Text).ToShortDateString في حدث TextChanged
ملاحظة الكود من أحد مشاركات الأخ Ramilove

[يوسف]

اكتب         TextBox1.Text = CDate(TextBox1.Text).ToShortDateString في حدث TextChanged
ملاحظة الكود من أحد مشاركات الأخ Ramilove

صباح الخير عزيزي


لم يعمل معي الكود

ممكن تشرح المثال اكثر

أو ترفق مثال جاهز حتى اكتشف الخطأ الذي عندي

[ismail2012]

صباح الخير عزيزي


لم يعمل معي الكود

ممكن تشرح المثال اكثر

أو ترفق مثال جاهز حتى اكتشف الخطأ الذي عندي

كود :

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TextBox1.Text = Now
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = CDate(TextBox1.Text).ToShortDateString
    End Sub
End Class

[العزابي]

غير نوع الحقل إلى نص وليس تاريخ

ثم ضع الكود التالي

Private Sub TextBox1_TextChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.Enter
TextBox1.Text = DateAdd(DateInterval.Day, 0, Date.Now.Date).ToString("yyyy/MM/dd")
End Sub

[يوسف]

صباح الخير عزيزي


لم يعمل معي الكود

ممكن تشرح المثال اكثر

أو ترفق مثال جاهز حتى اكتشف الخطأ الذي عندي

كود :

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TextBox1.Text = Now
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = CDate(TextBox1.Text).ToShortDateString
    End Sub
End Class

عملت المثال ويظهر لي الخطأ التالي عند تشغيل المثال
كيف الحل ؟

[تركي قرمزلي]

السلام عليكم و رحمة الله و بركاته
أعتقد أن القيمة الموجودة في التيكست ليست تاريخ صحيح
السلام عليكم و رحمة الله و بركاته

[يوسف]

هل لازم اضع أداة قاعدة بيانات؟

انا اريد التاريخ بدون قاعدة بيانات فقط بمربع النص يظهر التاريخ

[العزابي]

الاخ يوسف تفضل

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

datee()

End Sub
Public Sub datee()
TextBox1.Text = DateAdd(DateInterval.Day, 0, Date.Now.Date).ToString("yyyy/MM/dd")

End Sub

[يوسف]

مرحبا العزابي

شاهد الصورة





هل استطيع عرض التاريخ الميلادي في الحقل الثاني بنفس الوقت


يعني اريد يعرض في الحقل الأول التاريخ الهجري

والحقل الثاني التاريخ الميلادي ؟