Android Question DateDialog Width?

Dim strf1 As StringFunctions
    Dim b As EditText
    b=Sender
    Dim keuzeDate As String
    Dim ret As Int
    Dim Dd As DateDialog
    If passeddate="" Then
        Dd.Year = DateTime.GetYear(DateTime.Now)
        Dd.Month = DateTime.GetMonth(DateTime.Now)  
        Dd.DayOfMonth = DateTime.GetDayOfMonth(DateTime.Now)
    Else
        Dd.Year = strf1.Mid(passeddate,7,4)
        Dd.Month= strf1.Mid(passeddate,4,2)
        Dd.DayOfMonth = strf1.Mid(passeddate,1,2)
    End If
    ret=Dd.show("Start/end date", "", "OK", "CANCEL", "",Null)
    If ret=DialogResponse.CANCEL Then
        Return
    Else
        keuzeDate=NumberFormat(Dd.DayOfMonth,2,0) & "-" & NumberFormat(Dd.month,2,0) & "-" &  Dd.Year
        b.Text=keuzeDate
    'Msgbox(NumberFormat(Dd.DayOfMonth,2,0) & "-" & NumberFormat(Dd.month,2,0) & "-" &  Dd.Year,"Datum")
    End If