[VB] Il font COURIER non è COURIER!?

[Magnum2000]

Ciao ragazzi.
Sto realizzando un programma che utilizza una funzione di stampa.
Dato che sto utilizzando il metodo PRINT per la stampa (bello rozzo) sto cercando di capire quanti caratteri possono entrare in una zona del foglio.
Per uniformare la stampa vorrei impostare il font Courier in modo da sapere con precisione quanti caratteri posso stampare.
Ho utilizzato il seguente comando:

Printer.FontName = "Courier"
Non so con che carattere stampi, di certo non è il courier.
La cosa strana è che sulle stampanti CANON si verifica questo inconveniente, mentre sulle altre no.
Come posso risolvere il problema?
Grazie!

[vonkranz]

Prova a mettere

Printer.FontName = "Courier New"

Al limite, per vedere quali sono i font supportati, puoi far girare qualche cosa di questo tipo:

   Dim p As Printer
   Dim f As Integer
   For Each p In Printers
      Me.Print "Stampante: ";p.DeviceName
      For f = 1 To 1000
         If p.Fonts(f) = "" Then
            Exit For
         End If
         Me.Print p.Fonts(f)
      Next f
   Next

e nel form avrai tutti i font supportati.

[Magnum2000]

Originariamente inviato da vonkranz
Prova a mettere

Printer.FontName = "Courier New"

...e nel form avrai tutti i font supportati.

Grazie!
Proverò subito.
Spero che le Canon riconoscano il Courier (sarebbe il colmo se non lo riconoscessero)