Langkah pertama dalam pembuatan sebuah kalkulator dengan menggunakan foxpro ialah sebagai berikut
- Buatlah form baru sehingga keluar seperti gambar berikut
- Kemudian desainlah kalkulator yang akan dibuat menggunakan fasilitas textbox dan command button, terlihat seperti gambar berikut :
- Kemudian rubahlah caption pada setiap command button yang ada, dengan cara klik kanan pada comman button kemudian pilih properties sehingga keluar dialog berikut
- Setelah dirubah kemudian tampilan kalkulator sederhana ini sudah selesai dibuat
Selesai sudah membuat sebuah tampilan kalkulator sederhana dengan foxpro,, eits tapi kalkulator ini belum berfungsi, ini baru sekedar gambarnya saja. Berikut ini kita masuk ketahap codingnya agar kalkulator ini dapat berfungsi. Ikuti langkah-langkah berikut :
- Double klik pada command button yang bertanda (*), nanti akan muncul tempat untuk mengisikan kode-kode yang diperlukan seperti gambar dibawah ini, pada procedure kita pilih “Click”
- Kemudian masukan kode berikut
bil1 = VAL(thisform.text1.Value) bil2 = VAL(thisform.text2.Value) hasil = bil1*bil2 thisform.text3.Value = hasil
* Fungsi VAL() disini digunakan untuk mengubah tipe data yang ada pada textbox dari String (STR) menjadi Numerik agar dapat melakukan operasi bilangan pada kalkulator ini.
- Lakukan kedua langkah diatas sesuai dengan tanda yang ada, jika command button yg dipilih bertanda(+) maka pada codenya hasil = bil1+bil2, begitu seterusnya
- Kemudian command button dengan caption “C” kita isikan dengan code
thisform.text1.Value = "0" thisform.text2.Value = "0" thisform.text3.Value = "0"
- Setelah semuanya selesai maka save projectnya dan jalankan program kalkulator tersebut, berikut hasil dari kalkulator sederhananya