vb datetimepickerから日本語曜日を取得する

vb datetimepickerから日本語曜日を取得する

Private Function GetDayOfWeekJp(ByVal  myDate As DateTimePicker) As String
        Return ("日月火水木金土").Substring(m_dtpNouhin.Value.DayOfWeek)
End Function