Показать выпадающий / комбинированный список в VB Script

я пытаюсь создать выпадающий / комбинированный список в VB Script. Насколько я понимаю, нам нужно создать экземпляр для Internet Explorer и создать выпадающий / комбинированный список, что-то вроде этого:

  set oIE = createObject("InternetExplorer.Application")
  with oIE
    .Navigate "about:blank"
    Do until .ReadyState = 4 : WScript.Sleep 100 : Loop
    set oDoc = .document
    .Visible = true
  end with

  with oDoc
    .open
    .writeln "ComboBox Example"
    .writeln "

" .writeln "" .close Do until .ReadyState = "complete" : WScript.Sleep 100 : Loop set oComboBox1 = .all.ComboBox1 end with with oComboBox1 .List = Array("One", "Two", "Three", "Four") .AutoWordSelect = true .focus end with oDoc.parentWindow.opener = "Me" bClosing = false on error resume next do until bclosing: wsh.sleep 100 : loop oIE.quit sub Closing : bClosing = True : end sub

Можно ли создать dorp-down / combo box без использования IE, аналогично Message Box или Input Box?

Ответы на вопрос(1)

Ваш ответ на вопрос