Dropdown_Weekday

#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


    $msg = ""
    $gui = GUICreate("Ship to:", 220, 120) ; creates a centered dialog box
    $button_ok = GUICtrlCreateButton("Send", 10, 80, 100)
    $button_cancel = GUICtrlCreateButton("Cancel", 110, 80, 100)
    $Combo_1 = GUICtrlCreateCombo("Select", 10, 40, 200, 21)
    GUICtrlSetData($Combo_1, "|Sunday|Monday|Tuesday|Wednesday|Thursday|Friday|Saturday|")
    GUICtrlSetData(-1, "Saturday")
    GUICtrlCreateLabel("Select Day of Week", 10, 10)
    GUISetState(@SW_SHOW)

    While 1
        $msg = GUIGetMsg()
        Select
            Case $msg = $button_cancel Or $msg = $GUI_EVENT_CLOSE
                GUIDelete()
                ExitLoop

            Case $msg = $button_ok
                $Menustate = GUICtrlRead($Combo_1)
                If $Menustate = "Sunday" Then
                    $var1 = "1"
                    $var2 = "7014290644"
                    ExitLoop
                EndIf
                If $Menustate = "Monday" Then
                    $var1 = "2"
                    $var2 = "3"
                    ExitLoop
                EndIf
                If $Menustate = "Tuesday" Then
                    $var1 = "3"
                    $var2 = "7014290900"
                    ExitLoop
                EndIf
                If $Menustate = "Wednesday" Then
                    $var1 = "4"
                    $var2 = "7014291000"
                    ExitLoop
                EndIf
                If $Menustate = "Thursday" Then
                    $var1 = "5"
                    $var2 = "7014291300"
                    ExitLoop
                EndIf
                If $Menustate = "Friday" Then
                    $var1 = "6"
                    $var2 = "7014291100"
                    ExitLoop
                EndIf
                If $Menustate = "Saturday" Then
                    $var1 = "7"
                    $var2 = "7014291400"
                    ExitLoop
                EndIf

        EndSelect
    WEnd
    GUIDelete()

$var3 = @WDAY - $var1
ConsoleWrite("var3=" & $var3 & @CRLF)

MsgBox(64, "You Chose:", $Menustate & @CRLF & _
          @Tab & $var1 & ": day of the week" & @CRLF & _
          @Tab & @WDAY & ": is Today!" & @CRLF & _
          @Tab & $var3 & ":  Days until then" & @CRLF & _
          "What now ?  :-)")