Dear all
sedang belajar buat fungsi kok bingung neh.
fungsi pertama:
Function Hari(tgl)
y = tgl Mod 7
Select Case y
Case 0: Hari = "Sabtu"
Case 1: Hari = "Ahad"
Case 2: Hari = "Senin"
Case 3: Hari = "Selasa"
Case 4: Hari = "Rabu"
Case 5: Hari = "Kamis"
Case 6: Hari = "Jumat"
End Select
End Function
fungsi kedua:
Function Pasaran(tgl)
x = tgl Mod 5
Select Case x
Case 0: Pasaran = "Kliwon"
Case 1: Pasaran = "Manis"
Case 2: Pasaran = "Pahing"
Case 3: Pasaran = "Pon"
Case 4: Pasaran = "Wage"
End Select
End Function
Gimana cara gabuninnya sehingga
fungsi weton(tgl)
weton=hari dan pasaran
Thanks b4
Regards, Wuryantadi
___________________________________________________________
All New Yahoo! Mail – Tired of [EMAIL PROTECTED]@! come-ons? Let our SpamGuard
protect you. http://uk.docs.yahoo.com/nowyoucan.html
SPAM IS PROHIBITED
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/belajar-access/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/belajar-access/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED]
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
