Imprimir en puerto USB

[alexiscespedes]

Hola amigos tengo el siguiente codigo.

Dim codigo As Integer
Dim alumno,direccion,telefono As String

for x = 0 to 2

Open "LPT1" for output as #1

Print #1, codigo,alumno,direccion,telefono

next
close

Si tuviera la impresora conectada al puerto LPT1 esto funcionaria, pero mi impresora esta conectada a un puerto USB. En la instruccion Open le puse "USB001" y no me imprime nada. Por favor si alguien me puede indicar como es la instruccion para que me imprima en el puerto USB le agradecere me ayude

Gracias