Fungsi Penanggalan pada foxpro

buka microsoft  visual foxpro  0.6

close all

clear all

set defa to D:\belajar foxpro

Selanjutnya pili file-new-project-new file

 

Selanjutnya pilih document-form-pilih new-new f0rm

maka tampilan nya seperti  ini

Selanjutnya pilih document-form-pilih new-new f0rm

 tampilannya seperti ini

Langkah selanjutnya isi form ini dengan Labe l-Text box -Command Button

Pilih Form Controls  tersebut  seperti  ini

Selanjutnya beri nama di label, di text 1 idak di beri tulisan apapun dan di Command1 ganti dengan tulisan Tampil cara nya di Properties Pili Caption Command1 masukkan tulisan Tampil 

Disini teman-teman buat 7 Karakter

Yang terakhir masukkan rumus di command batton /tampil klik 2x 

 THISFORM.TEXT1.VALUE=DATE()

THISFORM.TEXT2.VALUE=CDOW(DATE())

THISFORM.TEXT3.VALUE=CMONT(DATE())

THISFORM.TEXT4.VALUE=DAY(DATE())

THISFORM.TEXT5.VALUE=MONTH(DATE())

THISFORM.TEXT6.VALUE=DOW(DATE())

THISFORM.TEXT7.VALUE=YEAR(DATE())

Rumus Keluar nya : thisform.release

Disini teman-teman buat 7 Karakter

Maka hasilnya seperti ini :