<div>
Found this which should help you... 

<pre><code class="code-10 nolinks" id="code-20-42359516-1">Public Function GetDate()

 Dim dt As Date = Today

 Dim FirstWeek As Integer = 1
 Dim SecondWeek As Integer = 2
 Dim ThirdWeek As Integer = 3
 Dim FourthWeek As Integer = 4
 Dim LastWeek As Integer = 5

 MsgBox(GetNthDayOfNthWeek(dt, DayOfWeek.Monday, LastWeek).ToString)

End Function

Public Function GetNthDayOfNthWeek(ByVal dt As Date, ByVal DayofWeek As Integer, ByVal WhichWeek As Integer) As Date
 'specify which day of which week of a month and this function will get the date
 'this function uses the month and year of the date provided

 'get first day of the given date
 Dim dtFirst As Date = DateSerial(dt.Year, dt.Month, 1)

 'get first DayOfWeek of the month
 Dim dtRet As Date = dtFirst.AddDays(6 - dtFirst.AddDays(-(DayofWeek + 1)).DayOfWeek)

 'get which week
 dtRet = dtRet.AddDays((WhichWeek - 1) * 7)

 'if day is past end of month then adjust backwards a week
 If dtRet &gt;= dtFirst.AddMonths(1) Then
 dtRet = dtRet.AddDays(-7)
 End If

 'return
 Return dtRet

End Function
'ref: https://stackoverflow.com/questions/17520008/how-do-i-get-first-second-or-last-tuesday-or-any-day-of-the-week-of-a-given-m
</code></pre>
</div>

<div>
Thanks, I already saw that but its not what I require, when i ran it it just displayed the last weekday of the month
</div>

<div>
Call it like this with the month and year you want 
&nbsp; &nbsp; &nbsp; &nbsp; Dim monday As DateTime = SecondMonday(12, 2017) 
 
&nbsp;
<pre><code class="code-1 nolinks" id="code-20-42359554-1"> Private Function SecondMonday(mnth As Integer, yr As Integer) As DateTime
 Dim dte As DateTime = New DateTime(yr, mnth, 8, 0, 0, 0)
 While dte.DayOfWeek &lt;&gt; DayOfWeek.Monday
 dte = dte.AddDays(1)
 End While
 SecondMonday = dte
 End Function
</code></pre>
</div>

<div>
Thanks Andy, but when I tried that it shows the date as 21/11/2017 when it should be 13/11/2017?
</div>

<div>
It worked perfectly here. &nbsp;Have you made any adjustments to the code?
</div>

SNAG-0045.bmp

<div>
Nope, i only added the line at the end which shows &nbsp;the date in the text box 
 
My code in total 
 
&nbsp; &nbsp;
<pre><code class="code-10 nolinks" id="code-20-42359597-1"> Private Sub Button16_Click(sender As System.Object, e As System.EventArgs) Handles Button16.Click

 Dim monday As DateTime = SecondMonday(12, 2017)
 TextBox1.Text = (monday)

 End Sub


 Private Function SecondMonday(mnth As Integer, yr As Integer) As DateTime
 Dim dte As DateTime = New DateTime(yr, mnth, 8, 0, 0, 0)
 While dte.DayOfWeek &lt;&gt; DayOfWeek.Monday
 dte = dte.AddDays(1)
 End While
 SecondMonday = dte
 End Function
</code></pre>
</div>

<div>
You need to adjust the GetDate function to pull out the SecondWeek (not the LastWeek, as in the first example)
</div>

<div>
Ahh, I think you misread your message box 
 
<a href="https://filedb.experts-exchange.com/incoming/2017/11_w45/1209848/SNAG-0046.bmp" target="_blank" title="SNAG-0046.bmp (393 KB)"><img alt="SNAG-0046.bmp" class="file-block lazyload" style="max-width: 768px;" data-src="https://filedb.experts-exchange.com/incoming/2017/11_w45/1209848/SNAG-0046.bmp" /></a> 
I'd tested it with more than the current month and my code snippet was for December.
</div>

SNAG-0046.bmp

<div>
Sorry all, this was my fault as my program was not compiling correct and was running an older version, both worked thanks again
</div>

<div>
<div class="content wysiwyg-content">
Hi 
 
I use the following code to display the monday date of the current week 
 

<pre><code class="code-1 nolinks" id="code-10-29067227-1">Dim monday As DateTime = Today.AddDays((Today.DayOfWeek - DayOfWeek.Monday) * -1)
</code></pre>
I was hoping to amend it so it would display the date of the 2nd monday of the month? 
 
So if I was to run it now it would display 13/11/2017 
in december it would display 11/12/2017 
in january it would display 08/01/2017 
 
and so on 
 
There is no DayofMonth option whuch i thought would work, any help is appreciated thanks
</div>
</div>

Hi

I use the following code to display the monday date of the current week

(CODE)
I was hoping to amend it so it would display the date of the 2nd monday of the month?

So if I was to run it now it would display 13/11/2017
in december it would display 11/12/2017
in january it would display 08/01/2017

and so on

There is no DayofMonth option whuch i thought would work, any help is appreciated thanks

Display 2nd monday of the month

Visual Basic .NET (VB.NET) is an object-oriented programming language implemented on the .NET framework, but also supported on other platforms such as Mono and Silverlight. Microsoft launched VB.NET as the successor to the Visual Basic language. Though it is similar in syntax to  Visual Basic pre-2002, it is not the same technology,

Visual Basic.NET

The .NET Framework is not specific to any one programming language; rather, it includes a library of functions that allows developers to rapidly build applications. Several supported languages include C#, VB.NET, C++ or ASP.NET.

.NET Programming

Microsoft Visual Studio is an integrated development environment (IDE) from Microsoft. It is used to develop computer programs for Microsoft Windows, as well as web sites, web applications and web services. Visual Studio uses Microsoft software development platforms such as Windows API, Windows Forms, Windows Presentation Foundation, Windows Store and Microsoft Silverlight. It can produce both native code and managed code.