Форма с выпадающим списком

GUICreate("URL", 300, 30)
$combo = GUICtrlCreateCombo("", 5, 5, 290, 20)
GUISetState()

GUICtrlSetData($combo, "www.autoit-script.ru|www.yandex.ru|www.mail.ru")

Do
  Switch GUIGetMsg()
    Case -3
      Exit
    Case $combo
      Run(@ProgramFilesDir & "\Internet Explorer\iexplore.exe " & GUICtrlRead($combo))
      ; ShellExecute(GUICtrlRead($combo)) ; в браузере по умолчанию
      Exit
  EndSwitch
Until 0

GUICreate("URL", 300, 30)
$combo = GUICtrlCreateCombo("", 5, 5, 290, 20)
GUISetState()

Global $Names[3] = ["Форум autoit","Поисковик","Почта"]
Global $URLs[3] = ["www.autoit-script.ru","www.yandex.ru","www.mail.ru"]

For $i = 0 To UBound($Names) - 1
  GUICtrlSetData($combo, $Names[$i])
Next

Do
  Switch GUIGetMsg()
    Case -3
      Exit
    Case $combo
      $str = GUICtrlRead($combo)
      For $i = 0 To UBound($Names) - 1
        If $str = $Names[$i] Then Run(@ProgramFilesDir & "\Internet Explorer\iexplore.exe " & $URLs[$i])
      Next
      Exit
  EndSwitch
Until 0