Here’s some code for listing down the first Monday of every month in an year using C# and VB.NET. The Monday’s listed in this example are for the year 2010
C#
public static void Main(string[] args)
{
for (int mth = 1; mth <= 12; mth++)
{
DateTime dt = new DateTime(2010, mth, 1);
while (dt.DayOfWeek != DayOfWeek.Monday)
{
dt = dt.AddDays(1);
}
Console.WriteLine(dt.ToLongDateString());
}
Console.ReadLine();
}
VB.NET
Public Shared Sub Main(ByVal args() As String)
For mth As Integer = 1 To 12
Dim dt As New DateTime(2010, mth, 1)
Do While dt.DayOfWeek <> DayOfWeek.Monday
dt = dt.AddDays(1)
Loop
Console.WriteLine(dt.ToLongDateString())
Next mth
Console.ReadLine()
End Sub
OUTPUT
Tweet
1 comment:
Hi, This is Vijay here.
I need a VB.net function that finds out the last Thursday of the month, and adds 1 more day to it.
I have similar function that reads the 3rd Friday of the month & adds 1 more day to it.
-----------------
Function changeexpiration(ByVal dt As Date, ByVal num As Integer) As Date
'changes the date supplied to the 15th, adds or subtracts num month(s) to the date,
'and finds the first Friday on or after the 15th, which must be the 3rd Friday of that month
dt = dt.AddDays(15 - dt.Day)
dt = dt.AddMonths(num)
For x As Integer = 1 To 7
If dt.DayOfWeek = DayOfWeek.Friday Then
Exit For
End If
dt = dt.AddDays(1)
Next
Return dt.AddDays(1) 'actual expiration is the Saturday after close of trade on expiration Friday
End Function
---------------------
Thanks & regds.,
Vijay
Post a Comment