Buat teman - teman yang masih newbie belajar Foxpro 9, nih Aqooh postingin membuat Programnya yang berjudul 'ENTRI DATA MAHASISWA'. Kalau mau dijelaskan Hmm,,, Kayaknya Kepanjangan deh!!

Contoh Program Dengan Visual Foxpro 9

Saya membuat program FP ini hanya sekedar dari hobby program, bagi yang mempunyai kemampuan lebih mari kita saling berbagi email saya disini Membuat Sebuah Aplikasi pada Visual Foxpro Latihan: Kartu Hasil Studi Mahasisw 1. Buatlah Project dengan nama: khs.pjx 2. Buatlah Database didalam project: datakhs.dbc 3. Buatlah Tabel-tabel dibawah ini.

Tabel: mhs.dbf Name type Width Index Nim Character 8 Primary/Descending(↓) Nama Character 30 Jur Character 2 Jnskel Character 10 alamat Memo 4 telp Character 13 foto General 4 4. Buatlah form dengan tampilan sebagai berikut: frmmhs.scx Properties Object Name Lain-lain Form1 Form1 Caption=FORM MAHASISWA Text1 Txtnim Text2 Txtnama Combo1 Cjur Row Source=KA,MI,TK Row Source Type=1-Value Optiongroup1 Ojns Option1 Opl Caption=Laki-laki Option2 Opp Caption=Perempuan Edit1 Ealmt Text3 Txttelp Input Mask=9999 Command1 Cmdadd Command2 Cmdcancel Command3 Cmdsave Command4 Cmdedit Command5 Cmddelete Command6 Cmdexit Text3 Txtcari Command7 Cmdfind Timer1 Timer1 Interval=100 Text4 Txtdatetime Alignment=2-Center Command7 Cmdupload Caption=. Hallo gan, hari ini saya akan membagikan sebuah code yang digunakan untuk membuat sebuah program calculator sederhana. Jika sebelumnya saya telah membagikan sebuah code, maka kali ini saya membagikan code Program Visual FoxPro. Langsung saja dipraktekin. Hal pertama yang harus agan pikirkan dalam membuat sebuah calculator sederhana adalah tampilan dari calculator yang nantinya agan buat. Dalam membuat calculator sederhana dengan menggunakan Mocrosof Visual FoxPro, agan harus dapat berkreasi sekreatif mungkin, agar tampilan dari calculator yang nantinya agan buat dapat diminati oleh banyak orang.

Disini saya akan memberikan contoh tampilan calculator yang telah saya buat. Cara Membuat Program Biodata di Visual FoxPro Teman Teman sekalian kali ini kita akan mencoba membuat program biodata dengan. Pertama buatlah tampilan seperti dibawah ini: Yang dibutuhkan adalah label, textbox dan command button. Om Swastyastu Kali ini saya hanya posting ulang hasil pikiran orang sebuah program Entri Data Siswa Sederhana yang mudah dipahami. Langsung saja kita mulai 1. Buatlah Project dengan nama: khs.pjx 2. Buatlah Database didalam project: datakhs.dbc 3.

Buatlah Tabel-tabel dibawah ini. Tabel: mhs.dbf Name type Width Index Nim Character 8 Primary/Descending(↓) Nama Character 30 Jur Character 2 Jnskel Character 10 alamat Memo 4 telp Character 13 foto General 4 4. Buatlah form dengan tampilan sebagai berikut: frmmhs.scx. Ad Options Object Name Lain-lain Form1 Form1 Caption=FORM MAHASISWA Text1 Txtnim Text2 Txtnama Combo1 Cjur Row Source=KA,MI,TK Row Source Type=1-Value Optiongroup1 Ojns Option1 Opl Caption=Laki-laki Option2 Opp Caption=Perempuan Edit1 Ealmt Text3 Txttelp Input Mask=9999 Command1 Cmdadd Command2 Cmdcancel Command3 Cmdsave Command4 Cmdedit Command5 Cmddelete Command6 Cmdexit Text3 Txtcari Command7 Cmdfind Timer1 Timer1 Interval=100 Text4 Txtdatetime Alignment=2-Center Command7 Cmdupload Caption=. = Listing Program frmmhs.scx Form1 activate thisform.nonaktif thisform.bersih thisform.txtnim.Enabled=.F.

Microsoft Visual Foxpro Download

Thisform.Caption=”FORM MAHASISWA”+SPACE(100) Form1 load SET DEFAULT TO c: pagi kelas nim khs&&mengaktifkan path folder USE mhs &&mengaktifkan table mhs.dbf SET ORDER TO tag nim &&menggunakan key nim PUBLIC no &&PUBLIC berfungsi untuk membuat variabel secara global PUBLIC isi,lcgambar SET DATE ITALIAN Form1 aktif thisform.txtnama.Enabled=.T. Form1 nonaktif thisform.txtnama.Enabled=.F. Form1 bersih thisform.txtnim.Value=”' thisform.txtnama.Value=”' thisform.cjur.Value=”' thisform.ojns.Value=0 thisform.ealmt.Value=”' thisform.txttelp.Value=”' thisform.olefoto.

Visual Foxpro Program

Form1 tampil thisform.txtnim.Value=mhs.nim thisform.txtnama.Value=mhs.nama thisform.cjur.Value=mhs.jur IF mhs.jnskel=”Laki-laki” then thisform.ojns.opl.Value=1 thisform.ojns.opp.Value=0 ELSE IF mhs.jnskel=”Perempuan” then thisform.ojns.opl.Value=0 thisform.ojns.opp.Value=1 ENDIF ENDIF thisform.ealmt.Value=mhs.alamat thisform.txttelp.Value=mhs.telp thisform.olefoto.ControlSource=”mhs.foto” thisform.olefoto.Visible=.T.