latihan 9

rumus :
use mahasiswa && Tabel : Mahasiswa NPM
APPEND BLANK && Menimpan Rscord Kosong
WITH thisform
REPLACE nip WITH .text1.value && Mengisi nip
REPLACE nama WITH .text2.value &&Mengisi Nama
REPLACE tanggal lahir WITH .text3.value &&Mengisi tanggal lahir
replace alamat with.text4.value &&Mengisi alamat
replace golongan with.combo1.value &&Mengisi gololongan


.text1.value=""
.text2.value=""
.Text3.Value={}
ENDWITH
MESSAGEBOX("Data Telah direkam",64,"info")
IF thisform.optiongrup1.option1.value=1 then
replace jenis WITH "Laki-Laki"
ELSE
Replace jenis WITH "perempuan"
ENDIF