Visual Basic - cambiar fuente printer.font ??

Estoy intentando cambiar la fuente de un listado. Quiero que utilice la fuente "terminal" para ello utilizo lo siguiente:
...
...
' el valor por defecto de Printer.FontName es "Arial"

fuente = Screen.Fonts(1)
' al comprobar que valor que tiene: fuente = "Terminal", de momento va bien"

Printer.FontName = fuente

' pero aqui no cambia, sigue igual: FontName = "Arial"

Printer.Orientation = 2
Printer.NewPage
Printer.FontSize = 18
...
...
Dónde está el problema, porque no cambia Arial por Terminal? He probado con otras fuentes y tampoco funciona y si que existen en mi equipo.

Espero que me podais ayudar. Gracias. Un saludo.

Posiblemente el error está en que utilizas:
fuente = Screen.Fonts(1)
en lugar de:
fuente = Printer.Fonts(1)
Deseo que te sirva. Saludos.