Copy-Paste the following function in a module and see if it helps:
<snip>
Public Function GetMondayDate(year As Integer, weekNum As Integer) As Date
Dim wkDay As Integer, tmpDt As Date
tmpDt = DateAdd("ww", weekNum - 1, DateAdd("d", -1, CDate("01-Jan-" & year)))
wkDay = weekDay(tmpDt, vbMonday)
GetMondayDate = DateAdd("d", 8 - wkDay, tmpDt)
End Function
</snip>
Waqas...
On Thu, 6 Jan 2005 10:20:11 +0800, rasta_jom <[EMAIL PROTECTED]> wrote:
>
> Hello All,
>
> I have a simple vb6 question, given is the week number and year, how can i
> get the monday date of the week?
>
> Rasta
'// =======================================================
Rules : http://ReliableAnswers.com/List/Rules.asp
Home : http://groups.yahoo.com/group/vbHelp/
=======================================================
Post : [email protected]
Join : [EMAIL PROTECTED]
Leave : [EMAIL PROTECTED]
'// =======================================================
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/vbhelp/
<*> 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/
