Imprimir un linea

[lvwrz]

Una pregunta Nika_L:

Mi analizador de Visual Studio 2010 no me permite ejecutar la resolucion que pusiste. Me da una advertencia en

Detalle ERROR: La variable 'di' se ha pasado como referencia antes de haberle asignado un valor. Podría producirse una excepción de referencia nula en tiempo de ejecución. Asegúrese de que la estructura o todos los miembros de referencia se hayan inicializado antes de que se utilicen.

Código vb:

If OpenPrinter(szPrinterName, hPrinter, 0) Then
            If StartDocPrinter(hPrinter, 1, di) Then  [B][COLOR="Red"][U] <-- AQUI el ERROR [/U][/COLOR][/B]
 
Error
 
                If StartPagePrinter(hPrinter) Then
                    ' Write your printer-specific bytes to the printer.
                    bSuccess = WritePrinter(hPrinter, pBytes, dwCount, dwWritten)
                    EndPagePrinter(hPrinter)
                End If
                EndDocPrinter(hPrinter)
            End If
            ClosePrinter(hPrinter)
        End If
 

¿Podrías darme una mano con esto?
Gracias!