الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أريد كود للحصول على التاريخ الميلادي الموافق للهجري

مغلق
بدأه akram_awad في 8 مايو 2007 · 2 رد · 2,093 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

أريد كود للحصول على التاريخ الميلادي الموافق للهجري

بعد إدخال التاريخ الهجري أود الحصول على التاريخ الميلادي الموافق للتاريخ الهجري و الحدث هو زر أمر ( Command Button )

شاكرين حسن تعاونكم

#2

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

* للتحويل من هجري إلى ميلادي :

	Dim TheDate As Date
	Calendar = vbCalHijri
	TheDate = "15/06/1411"
	Calendar = vbCalGreg
	MsgBox TheDate

* للتحويل من ميلادي إلى هجري :

	Dim TheDate As Date
	Calendar = vbCalGreg
	TheDate = "1/1/1991"
	Calendar = vbCalHijri
	MsgBox TheDate

استخدم محرك البحث فهناك المذيد

بالتوفيق ,,,,,

A7med_prof

اقتباس

آسف الدخول متقطع هذه القتره

اقتباس

[يمين]

.[/يمين]

A7med_prof-4-2007.jpg

اخر مواضيعي 2007

االمثال مطبق على موقع بورصه سعودي

.

.

مواضيع مهمه ومطلوبه بكثره VB6

.

بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,

.

أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .

.

</
#3

الأخ الفاضل ...

راجع: المثال DateConvert.zip الموجود فى الموضوع امكانية تعديل التاريخ الهجري ، للإطلاع على دوال التحويل ومزيد من التوضيح :)

شكراً

تم تعديل هذه المشاركة بواسطة Eng. Usama El-Mokadem في 9 مايو 2007 في 00:34

Eng. Usama El-Mokadem

Nothing is impossible, the word impossible itself says that: I M - Possible

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…