Untitled 1
 
  نظم السوائل المتحركة ( الهيدروليكا ) (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 10 )           »          دورات تكنولوجيا المعلومات (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 6 )           »          فن إدارة عمليات المسح الأمني للمنشآت الحساسة (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 9 )           »          إختبارات التربة والمواد وتأثيرها على المنشآت (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 17 )           »          اعداد الميزانيات التقديرية (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 10 )           »          السياحة والفنادق (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 11 )           »          أساسيات برنامج الماتلاب (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 42 )           »          مناقشة تدريبية على خطط تأمين المنشأة من كافة العناصر (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 27 )           »          الدورات الهندسية (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 22 )           »          مراجعة التصاميم المعمارية وتوصيف المواد (اخر مشاركة : محمد عبدالحي - عددالردود : 0 - عددالزوار : 35 )           »         
 

 
العودة   منتديات سبيع الغلباء > الـمـنـتـديـات الـتـعـلـيـمـيـة > البرامج المجانية والكمبيوتر
 

البرامج المجانية والكمبيوتر جميع مايتعلق بالبرامج والكمبيوتر والانترنت المجانية ولا يسمح بوضع وصلات تحميل من مواقع غير مركز تحميل شبكة سبيع الغلباء فقط يمنع وضع كراكات أو برامج مضروبة

إضافة رد
 
أدوات الموضوع
 
غير متصل
 رقم المشاركة : ( 1 )
فاضل
عضو
رقم العضوية : 50546
تاريخ التسجيل : 22 - 06 - 2012
الدولة : ذكر
العمر : 38
الجنس :
مكان الإقامة :
عدد المشاركات : 10 [+]
آخر تواجد : [+]
عدد النقاط : 10
قوة الترشيح : فاضل is on a distinguished road
الأوسمـة
بيانات الإتصال
آخر المواضيع

التوقيت
Lightbulb اصنع ساعه فی برامج ویژوال بیسیک 6 - اخیکم فاضل من ایران

كُتب : [ 29 - 07 - 2012 - 08:31 ]

اول افتح برامج ویژوال بیسیک 6
من تنفتح صفحه new project انتخب standard exe بعد زر علی open
بعد حدد timer1 من لوحه الویژوال بیسیک 6
بعد اخذ من هذا الموضوع کپی و انتقله فی ماژول الصفه form1
وبعد امتحن البرامج تعطیک ساعه ممیزه انت هم تگدر تغیر الموضوع ابکیفک و تصنع ساعه احسن من هذا

Private Sub Form_Load()
Me.BackColor = vbBlack
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
Form1.Refresh
X = Form1.Width / 2
Y = Form1.Height / 2.2
Circle (X, Y), Y - 200, vbWhite
Circle (X, Y), Y - 220, vbWhite
For i = 1 To 12
Circle (X + (Y - 400) * Cos(i * 22 / 42), Y + (Y - 400) * Sin(i * 22 / 42)), 50, vbRed
Next
h = Hour(Time())
If h > 12 Then
h = h - 12
End If
m = Minute(Time())
s = Second(Time())
Line (X, Y)-(X + (Y - 600) * Cos((66 / 14 + s * (44 / 420))), Y + (Y - 600) * Sin((66 / 14 + s * (44 / 420)))), vbBlue
Line (X, Y)-(X + (Y - 800) * Cos((66 / 14 + m * (44 / 420))), Y + (Y - 800) * Sin((66 / 14 + m * (44 / 420)))), vbYellow
Line (X, Y)-(X + (Y - 1200) * Cos(66 / 14 + h * (44 / 84) + (m / 12) * (44 / 420)), Y + (Y - 1200) * Sin(66 / 14 + h * (44 / 84) + (m / 12) * (44 / 420))), vbWhite
End Sub

وسلام علیکم
اخیکم فاضل من ایران

رد مع اقتباس
 
إضافة رد

الكلمات الدلالية (Tags)
ساعه


الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1)
 
أدوات الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع

المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
عرض جمیع الفایل الخفیات فی حاسوبک - اخیکم فاضل من ایران فاضل البرامج المجانية والكمبيوتر 0 21 - 07 - 2012 10:20
احذف الفیروس exe.* و AUTORUN.inf من ذاکره فلاش میموری الشخصی - اخیکم فاضل من ایران فاضل البرامج المجانية والكمبيوتر 0 21 - 07 - 2012 10:02
اکتب ساب تایتل علا الفیلم بدون برامج میکس -اخیکم فاضل من ایران فاضل البرامج المجانية والكمبيوتر 0 20 - 07 - 2012 09:26


الساعة الآن 09:25.


Powered by vBulletin® Version 3.8.9, Copyright ©2000 - 2018, Jelsoft Enterprises Ltd. www.sobe3.com
جميع المشاركات تعبر عن وجهة كاتبها ،، ولا تتحمل ادارة شبكة سبيع الغلباء أدنى مسئولية تجاهها