devi semplicemente aggiungere la parola Call prima della chiamata alla sub.
codice:
sub1 (pippo as String, pluto as integer)
..
end sub

Call sub1(miaStringa, 1)