Thursday, May 16, 2013

PENGGUNAAN LOCATE

y=INPUTBOX("Kode yang ingin dihapus?","Info","")
x=namatabel.namarecord
LOCATE FOR x =y
IF FOUND()
      DELETE 
      PACK
      GO TOP
ENDIF
thisform.Refresh()

No comments: