منتديات حاسبكو المتخصصة بمادة الحاسب الآلي

منتديات حاسبكو المتخصصة بمادة الحاسب الآلي (http://www.7asabco.org/index.php)
-   الأرشـــــــــيــــــــــــف (http://www.7asabco.org/forumdisplay.php?f=87)
-   -   كيفيكة حل مشروع فيجول بيسك (http://www.7asabco.org/showthread.php?t=9983)

نونو العسوله 01-18-2010 04:02 PM

كيفيكة حل مشروع فيجول بيسك
 
1 مرفق
السلام عليكم ورحمته الله وبركاته


عندي أختبار حاسب نهائي ... والنموذج اللي عطتني إياه المعلمة حليته بعد عندي نموذجين ماعرفت أحله .. اللي يعرف يحله يساعدني بالحل ..

متميزه 01-18-2010 04:44 PM

مشاركة: كيفيكة حل مشروع فيجول بيسك
 
وعليكم السلااام والرحمة

معليش مافهمت قصدك بالاسهم بالنموذج الاول


سؤال :: هلى هو مشروع واحد او ثلاث مشاريع >>كل نموذج مستقل
اذا هو واحد عطينا الي حليتيه
يمكن نفهم السالفه

نونو العسوله 01-18-2010 05:22 PM

مشاركة: كيفيكة حل مشروع فيجول بيسك
 
1 مرفق
هذا الإختبار كامل ...

متميزه 01-18-2010 08:31 PM

مشاركة: كيفيكة حل مشروع فيجول بيسك
 
نونو ماختبرت البرنامج>>لانه ماعندي فجول
فاعلميني بالنتيجه^^

Private Sub Command1_Click( )
Dim s As Single
S= Text1.Text
SELECT CASE S
CASE 2000 to 2900
Text2.Text =360+S
CASE 3000 to 3900
Text2.Text=450+S
CASE 4000 to 5000
Text2.Text=600+S
CASE 5100 to 6000
Text2.Text=500+S
CASE 6100 to 8000
Text2.Text=700+S
CASE ELSE
(" السعر غير متاح ") Msgbox
END SELECT
End Sub




Private Sub Command1_Click( )
("اسعار المحمول .. مقدار غلاء الأسعار") MsgBox
End Sub

نونو العسوله 01-19-2010 04:09 AM

مشاركة: كيفيكة حل مشروع فيجول بيسك
 
أنا جربت هذا الكود

Private Sub Command1_Click( )
Dim s As Single
S= Text1.Text
SELECT CASE S
CASE 2000 to 2900
Text2.Text =360+S
CASE 3000 to 3900
Text2.Text=450+S
CASE 4000 to 5000
Text2.Text=600+S
CASE 5100 to 6000
Text2.Text=500+S
CASE 6100 to 8000
Text2.Text=700+S
CASE ELSE
(" السعر غير متاح ") Msgbox
END SELECT
End Sub

طلع صحيح ..

بس هذا


Private Sub Command1_Click( )
("اسعار المحمول .. مقدار غلاء الأسعار") MsgBox
End Sub

وين أحطه ولا مو لازم

متميزه 01-19-2010 01:21 PM

مشاركة: كيفيكة حل مشروع فيجول بيسك
 
نموذجك الرابع؟؟

إسمك وفصلك ورسالة للمستخدم توضح الغرض من البرنامج

ممكن يكون عنوانها معلومات عن البرنامج

نونو العسوله 01-19-2010 02:12 PM

مشاركة: كيفيكة حل مشروع فيجول بيسك
 
يعني كيف بالضبط ؟ مافهمت ؟

نونو العسوله 01-19-2010 02:42 PM

مشاركة: كيفيكة حل مشروع فيجول بيسك
 
النموذج الرابع ::: رساله للمستخدم توضح الغرض من البرنامج .. يعني أكتب مثل كذا
تتمكن من تصميم برامجك الخاصة دون الحاجة إلى انتظار اشخاص آخرين للقيام بمهام عملك وسوف تختلف طريقت تعاملك مع الحاسب فعندما تصادفك مشكلة ما فإنك تقوم ببرمجتها بالطريقة التي تراها مناسبه لك ومن ثم توزيعها على المستفيدين منه

متميزه 01-19-2010 04:23 PM

مشاركة: كيفيكة حل مشروع فيجول بيسك
 
اصبري

الهدف شو من البرنامج؟؟

من خلاله نعمل التحليل بتحديد المدخلات والمخرجات والعمليات

النموذج الاول ربط بين النماذج صح!!

النموذج الثاني اسعار المحمول

النموذج الثالث مقدار غلاء الاسعار

الرابع معلومات عن البرنامج<<اذا انا فهمت السؤال صح؟؟

سؤال :: انت شو حطيتي عنوان ادوات زر الخيار باشاشة المقدمة ؟؟

نونو العسوله 01-19-2010 04:31 PM

مشاركة: كيفيكة حل مشروع فيجول بيسك
 
المقدمة

كتبت مكان الــ فورم 1 الشاشة الرئيسيه

بعدين كتبت ترحيب ولكم ...


بعدين أخترت 3 opion button
كتبت فيها الشاشة الأولى
الشاشة الثانية
الشاشة الثالثه


الساعة الآن 11:30 PM.

Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2025, vBulletin Solutions, Inc. Trans by
جميع الحقوق محفوظة لدى موقع ومنتديات حاسبكو 1431هـ/1432هـ

a.d - i.s.s.w