Imports Infragistics.Win
Imports Infragistics.Win.UltraWinEditors
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' Set the MinDate property to the first day of the current year
Dim minDate As DateTime = New DateTime(DateTime.Today.Year, 1, 1)
' Set the MaxDate property to the last day of the current year
Dim maxDate As DateTime = New DateTime(DateTime.Today.Year, 12, 31)
End Sub