FORM GAJI KARYAWAN

langkah-langkah membuat program gaji karyawan menggunakan fox-pro
1.buaat label seanyak 7
2.buat text sebanyak 6
3.buat command sebanyak 2

kurang lebihnya nanti akan membentuk sperti gambar ini:


























sekarang isi enkripsinya :
1. pada object:form1          dan     procedure: actived  isi dengan:

thisform.text1.Value=""
thisform.text2.Value=0
thisform.text3.Value=0
thisform.text4.Value=0
thisform.text5.Value=0
thisform.text6.Value=0
thisform.text1.SetFocus()

2. pada object : text4   dan    procedure : losfocus   isi dengan:

jjk=thisform.text2.Value
  thisform.text5.Value=((jjk-8)*thisform.text3.Value)
ELSE
  thisform.text5.Value=0
endif
thisform.text6.Value=thisform.text4.Value+thisform.text5.value

3. pada object : command1   dan   procedure :     clik   isi dengan:

thisform.text1.Value=""
thisform.text2.Value=0
thisform.text3.Value=0
thisform.text4.Value=0
thisform.text5.Value=0
thisform.text6.Value=0
thisform.text1.SetFocus()

4. pada object : command2   dan  procedure : clik    isi dengan:

thisform.realase