Hola Foro.

siempre he tenido el agrado de encontrar muchas de mis consultas atravez de experiencias de otro usuarios, esta vez quiero compartir algo y a la vez solicitar una ayuda
miren este es mi código de impresión en VB6.0

'proceso para settear impresora
Sub SetPrinter(Impresora As String)
Dim p As Printer
For Each p In Printers
If UCase(p.DeviceName) = UCase(Impresora) Then
Set Printer = p
Exit For
End If
Next p
End Sub

'proceso para imprimir
sub ImpTicket

SetPrinter "imptickets"
Printer.FontName = "FontB11"
Printer.Print " mensaje letras grandes"
Printer.FontName = "FontA11"
Printer.Print " mensaje letras pequeñas"
Printer.Print "----------------------------------------"
Printer.enddoc

ahora la ayuda es como traduzco este código a VB.net, la versión que uso es la 2012, como setteo mi impresora y luego como mando a imprimir un DATATABLE, imagino como acceder a la informacion del DT, pero aun asi no se como teniendo esta información mandarla a imprimir

Gracias

Puedes empezar con algo asi,

Dim comm as Syste.IO.Ports.SerialPort
Dim txt as String

txt = el contenido del texto a enviar a la etiquetadora puede encontrar info en google

comm.open()
comm.write(txt)
comm.close()