tenho um projeto funcionando perfeito. mas queria uma luz, imprimir VBA direto na impressora alterando fonte.
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); Chr$(27) & Chr(69); " ---teste-------------"; Chr$(27) & Chr(70) & Chr$(20)
Print #1, Tab(5); "teste ";
Print #1, Tab(5); " teste ";
Print #1, Tab(5); "----------------------------------------";
Print #1, Tab(5); "-RECIBO--" & Dia(0); " " & Datam & " " & Vhora(1); "--- Seq" & seq & " "; ""
Print #1, Tab(5); "----------------------------------------";
Print #1, Tab(5); " ";
Print #1, Tab(5); Chr$(27) & Chr(69) & " Placa: " & Placa & Chr$(27) & Chr(70)
Print #1, Tab(5); " Entrada: " & Datam; " Hora: " & Vhora(2)
Print #1, Tab(5); " Tempo estacionado: " & Thora; ""
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); "Tot Estadia " & valor
Print #1, Tab(5); "Em Dinheiro " & valor
Print #1, Tab(5); "----------------------------------------";
Print #1, Tab(5); "--Est01-Mq01----Op1-----032----Ver 3.34-";
Print #1, Tab(5); "-AGRADECEMOS-A-PREFERENCIA--ifox.com.br-";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
esta imprimindo normal queria aumentar o formato da letras
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); Chr$(27) & Chr(69); " ---teste-------------"; Chr$(27) & Chr(70) & Chr$(20)
Print #1, Tab(5); "teste ";
Print #1, Tab(5); " teste ";
Print #1, Tab(5); "----------------------------------------";
Print #1, Tab(5); "-RECIBO--" & Dia(0); " " & Datam & " " & Vhora(1); "--- Seq" & seq & " "; ""
Print #1, Tab(5); "----------------------------------------";
Print #1, Tab(5); " ";
Print #1, Tab(5); Chr$(27) & Chr(69) & " Placa: " & Placa & Chr$(27) & Chr(70)
Print #1, Tab(5); " Entrada: " & Datam; " Hora: " & Vhora(2)
Print #1, Tab(5); " Tempo estacionado: " & Thora; ""
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); "Tot Estadia " & valor
Print #1, Tab(5); "Em Dinheiro " & valor
Print #1, Tab(5); "----------------------------------------";
Print #1, Tab(5); "--Est01-Mq01----Op1-----032----Ver 3.34-";
Print #1, Tab(5); "-AGRADECEMOS-A-PREFERENCIA--ifox.com.br-";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
Print #1, Tab(5); " ";
esta imprimindo normal queria aumentar o formato da letras