Bhé tramite output puoi creare un documento .bat con i comandi suggeriti da TeGlider ed eseguirlo. Cerca su google ulteriori spiegazioni, sono cose semplici che si trovano.
scusa ma non mi funziona :
in vb6 ho messo un command button poi ho scritto
Private Sub Command1_click()
open "%sistemroot%:\document and settings\%username%\desktop" for Append as #1
Print #1 "netsh firewall add portopening TCP "1234" PORTAWEB"
close #1
end sub