Показать выпадающий / комбинированный список в 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?