فيجول بيسك
بسم الله الرحمن الرحيم
مرحبا بك عزيزي الزائر. المرجوا منك أن تعرّف بنفسك و تدخل المنتدى معنا. إن لم يكن لديك حساب بعد, نتشرف بدعوتك لإنشائه.


منتدى الفيجول بيسك
 
الرئيسيةالرئيسية  البوابةالبوابة  اليوميةاليومية  س .و .جس .و .ج  بحـثبحـث  الأعضاءالأعضاء  المجموعاتالمجموعات  التسجيلالتسجيل  دخول  

شاطر | 
 

 كيفية تحديد اسم اليوم الحالي في الفيجول بيسيك

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
Admin
Admin


المساهمات : 26
تاريخ التسجيل : 26/02/2011

مُساهمةموضوع: كيفية تحديد اسم اليوم الحالي في الفيجول بيسيك   الخميس مارس 24, 2011 8:25 am

كيفية تحديد اسم اليوم الحالي في الفيجول بيسيك




اضف الى الفورم زر الأمر commandButton ثم Label
ثم ضع الكود التالي في زر الأمر :

الكود:

Dim Dday As Integer
Dday = Weekday(Date)
If Dday = 1 Then Label1.Caption = "الأحد"
If Dday = 2 Then Label1.Caption = "الاثنين"
If Dday = 3 Then Label1.Caption = "الثلاثاء"
If Dday = 4 Then Label1.Caption = "الأربعاء"
If Dday = 5 Then Label1.Caption = "الخميس"
If Dday = 6 Then Label1.Caption = "الجمعة"
If Dday = 7 Then Label1.Caption = "السبت"

و اليكم المثال:
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

.
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://visualbasic.alamontada.com
 
كيفية تحديد اسم اليوم الحالي في الفيجول بيسيك
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
فيجول بيسك :: فيجول بيسك Visual Basic-
انتقل الى: