teacher_widi

Untitled

May 14th, 2017
215
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Dim tanggalAwal As Date
  2. tanggalAwal = DateAdd(WeekDay("d", Date, VBSunday) * (-1) + 1, Date)
Advertisement
Add Comment
Please, Sign In to add comment