Pembicaraan Pengguna:Abdul Ibrahim

Halo, Abdul Ibrahim, selamat datang di Wikipedia bahasa Indonesia!

Memulai Memulai Para pengguna baru dapat melihat Pengantar terlebih dahulu. Untuk mencoba-coba menyunting, silakan gunakan bak pasir. Tuliskan juga sedikit profil Anda di Pengguna:Abdul Ibrahim, halaman profil dan ruang pribadi Anda, agar kami dapat lebih mengenal Anda. Baca juga Pancapilar sebelum melanjutkan. Ini adalah lima hal penting yang mendasari hari-hari Anda bersama Wikipedia di seluruh dunia. Bantuan Bantuan Bantuan:Isi - tempat mencari informasi tentang berkontribusi di Wikipedia, sebelum bertanya kepada pengguna lain. FAQ - pertanyaan yang sering diajukan tentang Wikipedia. Portal:Komunitas - informasi aktivitas di Wikipedia. Tips Tips Selalu tanda tangani pertanyaan Anda di Warung Kopi atau halaman pembicaraan dengan mengetikkan ~~~~ pada akhir kalimat Anda. Ini akan otomatis diubah menjadi nama pengguna dan tanggal. Jangan lupa: Prinsip dan pedoman dasar Wikipedia. Ingin membuat atau menyunting halaman? Kenali dulu gaya Wikipedia! Lalu lihat memulai halaman baru dan menyunting sebuah halaman. Membuat kesalahan? Membuat kesalahan? Jangan takut! Anda tidak perlu takut salah ketika menyunting atau membuat halaman baru, menambahkan atau menghapus kalimat. Pengurus dan para pengguna lainnya yang memantau perubahan terbaru akan segera menemukan kesalahan Anda dan mengembalikannya seperti semula. Welcome! If you are not an Indonesian speaker, you may want to visit the Indonesian Wikipedia embassy or a slight info to find users speaking your language. Enjoy! Selamat menjelajah, kami menunggu suntingan Anda di Wikipedia bahasa Indonesia!

CARA MENDESAIN VISUAL FOX PRO

1. BUAT NAMA FOLDER DI LOCAL DISK C: - Contoh, LATIHAN

2. BUAT PROJECT : - Pilih Menu FILE – NEW – PROJECT – NEW FILE - BROWSE NAMA FOLDER Yang Akan Kita Simpan - TULISKAN NAMA Yang Akan Di Simpan - SAVE

3. MEMBUAT TABLE: - DATA – FREE TABLES – TABLE – NEW –NEW TABLE - BROWSE NAMA FOLDER Yang Akan Kita Simpan - TULISKAN NAMA Yang Akan Di Simpan - SAVE

- ISILAH TABLE DESAIGNER

4. CARA MEMBUAT FORM : - DOCUMENT – FORM – NEW – NEW FORM - Desainlah Seperti Yang Dimau.

5. MENGHUBUNGKAN TABLE DENGAN FORM (FROM-LOAD) - Klik 2x Pada FORM Akan Tampil Seperti Di Bawah Ini - Lalu Isikan LISTING PROGRAM Seperti Di Bawah

SET DEFAULT TO C:\FOXLAT USE daftar SET ORDER TO TAG KODE

6. MEMBUAT 4 PROSEDURE (HIDUP,MATI,TAMPIL,KOSONG) - Pilih MENU FORM - NEW METHOD - Tulis, HIDUP,MATI,TAMPIL,KOSONG

	- ADD 

FORM1 HIDUP - Klik 2x Pada FORM - Masukan Seperti Ini

THISFORM.TExt1.Enabled= .T. THISFORM.TExt2.Enabled= .T. THISFORM.TExt3.Enabled= .T. THISFORM.TExt4.Enabled= .T.

FORM1 MATI - Klik 2x Pada FORM - Masukan Seperti Ini

THISFORM.TExt1.Enabled= .F. THISFORM.TExt2.Enabled= .F. THISFORM.TExt3.Enabled= .F. THISFORM.TExt4.Enabled= .F.

FORM1 TAMPIL - Klik 2x Pada FORM - Masukan Seperti Ini

THISFORM.TExt1.Value=KODE THISFORM.TExt2.Value=NAMA THISFORM.TExt3.Value=HARGA THISFORM.TExt4.Value=JUMLAH

FORM1 KOSONG - Klik 2x Pada FORM - Masukan Seperti Ini

THISFORM.TExt1.Value="" THISFORM.TExt2.Value="" THISFORM.TExt3.Value=0 THISFORM.TExt4.Value=0

FORM1 INIT - Klik 2x Pada FORM - Masukan Seperti Ini

THISFORM.MATI THISFORM.TAMpil

7. PERINTAH TAMBAH

IF THISFORM.COMmand1.Caption="TAMBAH" THISFORM.COMmand1.Caption="SIMPAN" THISFORM.HIDUp THISFORM.KOSong THISFORM.TExt1.SetFocus ELSE APPEND BLANK REPLACE KODE WITH THISFORM.TExt1.Value REPLACE NAMA WITH THISFORM.TEXt2.Value REPLACE HARGA WITH THISFORM.TEXt3.Value REPLACE JUMLAH WITH THISFORM.TEXt4.Value SKIP 0 THISFORM.COMmand1.Caption="TAMBAH" THISFORM.MATi ENDIF 8. PERINTAH EDIT

IF THISFORM.COMmand2.Caption="EDIT" THISFORM.COMmand2.Caption="SIMPAN" THISFORM.HIDUp THISFORM.TExt1.SetFocus ELSE REPLACE KODE WITH THISFORM.TExt1.Value REPLACE NAMA WITH THISFORM.TEXt2.Value REPLACE HARGA WITH THISFORM.TEXt3.Value REPLACE JUMLAH WITH THISFORM.TEXt4.Value SKIP 0 THISFORM.COMmand2.Caption="EDIT" THISFORM.MATi ENDIF

9. PERINTAH MAJU

IF EOF() MESSAGEBOX("INI ADALAH DATA TERAKHIR") ELSE SKIP THISFORM.TAMpil ENDIF

10. PERINTAH MUNDUR

IF BOF() MESSAGEBOX("INI ADALAH DATA AWAL") ELSE SKIP -1 THISFORM.TAMpil ENDIF

11. PERINTAH HAPUS

IF EOF() MESSAGEBOX("DATA SUDAH HABIS") ELSE DELETE SKIP THISFORM.TAMPil ENDIF

12. PERINTAH CETAK

REPORT FORM daftar.FRX PREVIEW

13.PERINTAH TAMPIL

BROWSE

14.PERINTAH KELUAR

THISFORM.Release

A~~S