منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
اداة التاريخ والوقت - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : اداة التاريخ والوقت (/showthread.php?tid=3750)

اداة التاريخ والوقت - amsasa - 03-09-14

السلام عليكم

عندي اداة التاريخ والوقت وعندي text اداة نص واداة التاريخ تعرض التاريخ الحالي لليوم لكن انا اريد عرض التاريخ الذي يختاره المستخدم وعرضه في خانة النص

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

RE: اداة التاريخ والوقت - WAEL ABED - 03-09-14

اتفضل الكود التالى
Text1.Text = DTPicker1.Value

وشكرا

RE: اداة التاريخ والوقت - amsasa - 03-09-14

مرحبا اخي wael abed

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

RE: اداة التاريخ والوقت - Aly El-Haddad - 03-09-14

كود :
Public Class Form1

    Private Sub DateTimePicker1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged
        TextBox1.Text = DateTimePicker1.Value
    End Sub
End Class


RE: اداة التاريخ والوقت - amsasa - 03-09-14

شكرا اخي aly el-haddad عملت الكود واشتغلت معي شكرا لتعاونك

RE: اداة التاريخ والوقت - amsasa - 03-09-14

اخي aly el-haddad
لو كنت ابقي اعرض في خانة النص التاريخ short فقط بدون وقت ماذا اضيف للكود
مع جزيل الشكر

RE: اداة التاريخ والوقت - Aly El-Haddad - 03-09-14

كود :
Public Class Form1

    Private Sub DateTimePicker1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged
        TextBox1.Text = DateTimePicker1.Value.ToShortDateString()
    End Sub
End Class


RE: اداة التاريخ والوقت - amsasa - 04-09-14

مشكور ما قصرت الله يعطيك العافية

RE: اداة التاريخ والوقت - adel27 - 09-02-16

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

RE: اداة التاريخ والوقت - boudyonline - 09-02-16

Label1.Text = TimeOfDay
Label2.Text = DateString
وإذا أردت ظهور الوقت باستمرار

ضع Timer في الفورم
وأدرج الاكواد التالية في النموذج والمؤقت


PHP كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label2.Text = DateString
        Timer1.Start()

    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Label1.Text = DateTime.Now.ToLongTimeString()
    End Sub