For r As Integer = 0 To Me.DataGridView1.Rows.Count - 1
If Convert.ToDateTime(Me.DataGridView1.Rows(r).Cells(0).Value).ToString("MM", Globalization.CultureInfo.CreateSpecificCulture("en-US")) = "01" Then
Me.DataGridView1.Item(0, r).Style.BackColor = Color.LightSkyBlue
End If
Next