Dim printer as new printer using visual basic power pack