Current week in datagridview headers

Question

Hi Guys, with my code below I'm able to get the week days with datetime in datagridview column headers, but as the days goes, this columns keep changing date forward. how can I adjust this columns to keep current week days with date from sunday
to saturady without changing forward ? appreciated
Dim mydate As DateTime, str1 As String
Dim dayname As String = Date.Today.DayOfWeek.ToString()
Dim datevalue As Date
mydate = Now
For i = 0 To columns.Length - 1
Dim col As DataGridViewColumn = New DataGridViewTextBoxColumn()
mydate = DateTime.Today.AddDays(+i)
datevalue = mydate
str1 = datevalue.DayOfWeek.ToString
col.HeaderText = str1 & " " & mydate.ToString("d")
columns(i) = col
Next
Me.DataGridView1.Columns.AddRange(columns)
thanks

Answer 1

Yes it worked, thanks a lot. here is my code
Dim mydate As DateTime, str1 As String
Dim datevalue As Date
Dim columns As DataGridViewColumn() = New DataGridViewColumn(6) {}
For i = 0 To columns.Length - 1
Dim col As DataGridViewColumn = New DataGridViewTextBoxColumn()
Dim DateSunday As Date = Now.AddDays(-1.0 * CDbl(Now.DayOfWeek))
mydate = DateSunday.AddDays(+i)
datevalue = mydate
str1 = mydate.DayOfWeek.ToString
col.HeaderText = str1 & " " & mydate.ToString("d")
columns(i) = col
Next
Me.DataGridView1.Columns.AddRange(columns)