02-10-15, 12:42 AM
أيوه كذا بديت تمسك خط مضبوط
دوس أوب التكست مرتين وحط هذا الكود
If (e.KeyCode = Keys.Enter) Then
MsgBox("")
End If
بدل الرسالة خليه مثلا ً Textbox1.text=""
بالنسبة للتاريخ ما عليك منه كيف صورته في حقل الجدول
لقراته بشكل هجري استخدم هذا الكود
Dim x As String = DateTime.Now.ToString("yyyyMMdd", System.Globalization.CultureInfo.GetCultureInfo("ar-SA"))
بالنسلة للبحث برقم في تكست بوكس
select * from TableX where ID=" & val(Textbox1.text)
اشتغل
دوس أوب التكست مرتين وحط هذا الكود
If (e.KeyCode = Keys.Enter) Then
MsgBox("")
End If
بدل الرسالة خليه مثلا ً Textbox1.text=""
بالنسبة للتاريخ ما عليك منه كيف صورته في حقل الجدول
لقراته بشكل هجري استخدم هذا الكود
Dim x As String = DateTime.Now.ToString("yyyyMMdd", System.Globalization.CultureInfo.GetCultureInfo("ar-SA"))
بالنسلة للبحث برقم في تكست بوكس
select * from TableX where ID=" & val(Textbox1.text)
اشتغل
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات


