50 likes | 219 Views
Proses Pengulangan Perulangan memungkinkan kita mengeksekusi satu atau lebih baris kode sebanyak yang kita kehendaki . Terdapat tiga perintah di Visual Foxpro yang dipakai untuk perulangan , yaitu : Perintah DO WHILE – ENDDO
E N D
Proses Pengulangan Perulanganmemungkinkankitamengeksekusisatuataulebihbariskodesebanyakyang kitakehendaki. Terdapattigaperintah di Visual Foxpro yang dipakaiuntukperulangan, yaitu : Perintah DO WHILE – ENDDO Perintahinimengeksekusiperintah-perintah yang adadidalam loop kondisional. Perulangan akandilakukanterusmenerusselamakondisitersebutterpenuhi (.T. atauBenar). Sintak dari perintah pengulangan tersebut adalah : DO WHILE ……………………. ……………………. Bagian program yang akan diulang ……………………. ENDD
Pengulangantersebutakandilakukanbilakondisibenar. Pengulangandengankondisiinidapat pula menggunakan kondisi .T., yaitu : DO WHILE .T. ……………………. ……………………. Bagian program yang akan diulang ……………………. [Loop] [Exit] ENDDO Contoh : x=1 DO WHILE x <= 20 ? x x=x+1 ENDDO
Pengulangan EOF() dan BOF() Dalam Proses Berulang Proses pengulangandapatdilakukandalammemproses record-record dalamsuatutabelsatupersatuhinggahabis. Untukmembatasipengulanganbiasadigunakanfungsi EOF() (End Of File) dan BOF() (Begin Of File). Fungsitersebutakanmemberikanfungsinilailogika .T. bila pointer telahberadadiakhir file. Bentukpengulanganuntukmemproses file data sampaihabis : DO WHILE.NOT.EOF() ……………………. ……………………. Bagian program yang akan diulang ……………………. ENDDO
Perintah FOR . . . ENDFOR Perulanganiniakanmengeksekusiperintah-perintahsebanyak yang kitatentukan. Nilaiyang kita tentukan merupakan nilai tetap/konstanta. Sintak dari perintah pengulangan tersebut adalah : FOR <var>=<nilai_awal> TO <nilai_akhir> ……………………. ……………………. Bagian program yang akan diulang ……………………. ENDFOR Contoh : FOR v_angka = 1 TO 10 ? v_angka ENDFOR
Perintah SCAN . . . ENDSCAN Perintahinimemindahkan pointer record melewatitabel yang sedangdipilihdanmengeksekusiblokperintahsetiap kali record memenuhisyaratkondisi yang ditentukan. Sintak dari perintah pengulangan tersebut adalah : SCAN [FOR <kondisi1>] [WHILE <kondisi2>] ……………………. ……………………. Bagian program yang akan diulang ……………………. [loop] [Exit] ENDSCAN Contoh : SCAN FOR kota = “Palembang” ? nama, jurusan ENDSCAN