Dim pe As New PosExplorer()
        Dim m_Printer As PosPrinter = Nothing
        Dim ppdi = pe.GetDevice(DeviceType.PosPrinter, PrinterName)
        m_Printer = pe.CreateInstance(ppdi)
        m_Printer.Open()
        m_Printer.Claim(1000)
   
        If m_Printer.Claimed Then
           m_Printer.DeviceEnabled = True
           m_Printer.PrintNormal(PrinterStation.Receipt, "hello")
           m_Printer.DeviceEnabled = False
        End If

        m_Printer.Close()
        m_Printer.Release()