Amigos do Forum estou passando um trecho do código que imprime cheque direto pela porta lpt1
Open "LPT1" For Output As #1
strTexto = "R$" & Format(rst![ValorDoCheque], "Standard") & "**"
strImprimir = Space(66 - Len(strTexto)) & strTexto
Print #1, strImprimir
Print #1,
Como faço para pular uma linha com um espaço menor do que Print #1, pois com esse comando pula um espaço muito grande e a segunda linha fica fora do formato do cheque.
um abraço a todos.
Open "LPT1" For Output As #1
strTexto = "R$" & Format(rst![ValorDoCheque], "Standard") & "**"
strImprimir = Space(66 - Len(strTexto)) & strTexto
Print #1, strImprimir
Print #1,
Como faço para pular uma linha com um espaço menor do que Print #1, pois com esse comando pula um espaço muito grande e a segunda linha fica fora do formato do cheque.
um abraço a todos.