منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم

لدينا التالي :


و


فمطلوب كود يعطي c بالشكل التالي :

السلام عليكم

- إستخدم هذا الكود :


- تحياتي .

vb_coder كتب :السلام عليكم

- إستخدم هذا الكود :

كود :

dim a ,b as date
dim c as string

a =#15/10/2013#
b =#20/3/2013#
c =day(a) & "/" & month(b) & "/" & year(a)

msgbox c

- تحياتي .

مشكور جدا اخي

و كيف استعمل هذا الكود الخاص ب a اذا استبدلناه بتكست

السلام عليكم


- تحياتي .

عفوا حللت المشكل بفضل كود vb_coder

هل من الممكن البحث داخل الداتا جريد عن كل التواريخ الى فى الشهر الى نختار البحث عنه
يعنى مثلا اكتب رقم الشهر يحيلى كل التواريخ الى ف الداتا جريد الى ف خلال الشهر نفسه ياريت المساعده

torky1985 كتب :هل من الممكن البحث داخل الداتا جريد عن كل التواريخ الى فى الشهر الى نختار البحث عنه
يعنى مثلا اكتب رقم الشهر يحيلى كل التواريخ الى ف الداتا جريد الى ف خلال الشهر نفسه ياريت المساعده

يمكن البحث في قاعدة البيانات ثم اظهار النتيجة في الداتا غريد

واذا كان المطلوب طرح تاريخين من بعض
text3.text=a-b فس هذا الكود
A = CDate(Text1.Text)
B =CDate(Text2.Text)
Text3.Text =Day(A) & "/" & Month(B) & "/" & Year(A)