Set SvcService = CreateObject("Svcsvc.Service")
Sel = SvcService.FilterValue("раз" & vbCrLf & "два" & vbCrLf & "три", &H1+&H2+&H20, "Заголовок")
MsgBox "Выбрано """ & Sel & """" 

Если "навесить" данную процедура на "onclick" в текстовом поле hta, то при клике мы получим ещё одно окно, в котором можно набирать текст, а внизу будут фильтроваться варианты, и потом выбранный вариант можно вставить в текстовое поле.

Вопрос же заключается в том, как получить то же самое, но без svcsvc?
Я это представляю так: при переходе на тестовое поле (или заранее) выполняется некая процедура, которая формирует список, и когда набираешь текст - снизу появляются варианты.

Для примера - как это происходит в поисковиках при наборе текста.

Есть мысли?