Android Question Dialog DateTemplate

Private Sub DrawDays
    lblMonth.Text = MonthsNames.Get(month - 1)
    lblYear.Text = year
    SetYearsButtonState
    cvs.ClearRect(cvs.TargetRect)
    cvsBackground.ClearRect(cvsBackground.TargetRect)
    Dim firstDayOfMonth As Long = DateUtils.setDate(year, month, 1) - 1
    dayOfWeekOffset = (7 + DateTime.GetDayOfWeek(firstDayOfMonth) - FirstDay) Mod 7
    daysInMonth = DateUtils.NumberOfDaysInMonth(month, year)
    If year = selectedYear And month = selectedMonth Then
        'draw the selected box
        DrawBox(cvs, SelectedColor, (selectedDay - 1 + dayOfWeekOffset) Mod 7, _
            (selectedDay - 1 + dayOfWeekOffset) / 7)
    End If
    Dim daysFont As B4XFont = xui.CreateDefaultBoldFont(14)
    For day = 1 To daysInMonth
        Dim row As Int = (day - 1 + dayOfWeekOffset) / 7
        cvs.DrawText(day, (((dayOfWeekOffset + day - 1) Mod 7) + 0.5) * boxW, _
            (row + 0.5)* boxH + vCorrection, daysFont, DaysInMonthColor , "CENTER")
    Next
    cvsBackground.Invalidate
    cvs.Invalidate
End Sub