* buat ngubah string kalimat ke string bulan
Function UBAH_BLNN
Parameters _BLNKE
Do Case
Case _BLNKE='Januari'
_SAYBLN='01'
Case _BLNKE='Pebruari'
_SAYBLN='02'
Case _BLNKE='Maret'
_SAYBLN='03'
Case _BLNKE='April'
_SAYBLN='04'
Case _BLNKE='Mei'
_SAYBLN='05'
Case _BLNKE='Juni'
_SAYBLN='06'
Case _BLNKE='Juli'
_SAYBLN='07'
Case _BLNKE='Agustus'
_SAYBLN='08'
Case _BLNKE='September'
_SAYBLN='09'
Case _BLNKE='Oktober'
_SAYBLN='10'
Case _BLNKE='Nopember'
_SAYBLN='11'
Case _BLNKE='Desember'
_SAYBLN='12'
Endcase
Return _SAYBLN
Endfunc
MUCH ROFIUDIN
Apa yang kita pikirkan menentukan apa yang akan terjadi pada kita. Jadi, jika kita ingin mengubah hidup, kita perlu membentangkan pikiran kita. Profile-Ku
DOWNLOAD DI SINI!
PEMROGRAMAN ANDA...DISINI.!!!
TEMUKAN MOTIVASIMU DI SINI......!!!
TEMEN - TEMENKU SEKALIGUS PEMBAWA INSPIRASI BUATKU
GENERASI BIRU SLANK
