Распаковка и запаковка файлов в архивы - нужен графический вид - VB

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

Добрый день! Подскажите пожалуйста, есть два Bat файла

                    Листинг программы
                
@echo off
"C:\Program Files\7-Zip\7z" x %cd%\*.* -o%cd%\UnZip -r 
exit

- распаковка архивов в папку UnZip и

                    Листинг программы
                
@echo off
 
for /f "tokens=2 delims=_" %%i in ('2^>nul dir/a-d/b "HM440023T44_*.xml"') do (
 "%ProgramFiles%\7-Zip\7z.exe" a -tzip -mx7 -sdel "HM440023T44_%%~ni" "*M440023T44_%%i"
)
 
pause>nul& exit/b

-запаковка архивов в папке UnZip по маске. Хочется оформить все это в графический вид. Просто форма с двумя кнопками. Подскажите как это лучше сделать? Заранее спаибо.

Решение задачи: «Распаковка и запаковка файлов в архивы - нужен графический вид»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Private Sub Command1_Click()
Shell "C:\распаковка.bat"
End Sub
 
Private Sub Command2_Click()
Shell "C:\запаковка.bat"
End Sub
 
Private Sub Form_Load()
Command1.Caption = "распаковка"
Command2.Caption = "запаковка"
End Sub