Как запустить программу по имени (без пути и расширения) из ComboBox`a - VB

Формулировка задачи:

Имеется обычная новостная rss лента Например:

XML

В переменной A хранится слово которое нам нужно найти, например слово "Санкт-Петербург", с помощью обычного парсера мы находим это слово, но как взять весь кусок новости которая содержит это слово. Например это слово содержится в этой части

XML

то нужно спарсить именно от <item> до </item> если там имеется нужное слово.

Решение задачи: «Как запустить программу по имени (без пути и расширения) из ComboBox`a»

textual
                            Листинг программы 
                        
                            x = Shell (App.Path & "\1.bat")
Shell App.Path & "\1.bat"