برنامج حساب مرتبات الموظفين أولا رسم 3 frame كما في الشكل
FRAME1
1- تغير خاصيه الـCoption الي "أجمالي المرتب"
2- رسم 4 TEXTBOX و 4 LABEL
3- تغير خاصيه ال CAPTION لل 4 LABEL الي:-
الاول الي المرتب الاساسي
الثاني الي الاضافي
الثالث الي الحوافز
الرابع الي عدد الساعات
4-مسح خاصيه ال Text لل 4 Textbox وتغير خاصيه ال Name الي:-
الاول الي txtbs
الثاني الي txto
الثالث الي txte
الرابع الي txth
5-رسم command button ورسم label مجاور له لظهور الناتج كما في الشكل
6-تغير خاصيه الـ caption لل command button الي "إجمالي المرتب"
تغير خاصيه ال Name للـ label الي lblts مع مسح خاصيه ال caption
7- برمجه زر "إجمالي المرتب "كالاتي:-
lblts.Caption = (Val(txtbs.Text) + Val(txto.Text) + Val(txte.Text) * Val(txth.Text
((
FRAME2
1-تغير خاصيه الـCoption الي "الخصومات"
2-رسم 4 TEXTBOX و 4 LABEL
3-تغير خاصيه ال CAPTION لل 4 LABEL الي:-
الاول الي الضرائب
الثاني الي التأمينات
الثالث الي الغياب
الرابع الي عدد الايام
4-مسح خاصيه ال Text لل 4 Textbox وتغير خاصيه ال Name الي:-
الاول الي txtt
الثاني الي txti
الثالث الي txta
الرابع الي txtd
5-رسم command button ورسم label مجاور له لظهور الناتج كما في الشكل
6-تغير خاصيه الـ caption لل command button الي "أجمالي الخصومات"
تغير خاصيه ال Name للـ label الي txtkh مع مسح خاصيه ال caption
8-برمجه زر "أجمالي الخصومات" كالاتي:-
lblkh.Caption = (Val(txtt.Text) + Val(txti.Text) + Val(txta.Text) * Val(txtd.Text
((
FRAME3
رسم 1 command button و رسم1 LABEL
1-تغير خاصيه ال caption لل command button الي "صافي المرتب"
2-تغير خاصيه ال Name للـ label الي lblsm مع مسح خاصيه ال caption
3-برمجه زر صافي المرتب الي lblsm.Caption = lblts.Caption - lblkh.Caption