Use string as part of filename in Excel XP VBA

How do you take a string value and insert it into an excel vba saveas/savecopyas code line. The string value is 2 digits from an input box.
e.g activeworkbook.savecopyas( “\\directory\default filename text & [string from input box] & more default filename text.xls)