Visual Basic Foro
Programación => Visual Basic 6 => Mensaje iniciado por: zxs23 en Enero 28, 2010, 09:07:26 pm
-
Estoy imprimiento un bucle son varias lineas todas deben estar separadas digamos que por un centimetro por ejemplo pero la impresion en algunas filas salen separadas por 1.005cm y otras con 1cm exacto esto lo digo a modo de ejemplo.
Probando si utilizo vbCentimeters y el valor de CurrentY es 5 el msgbox devuelve 5.004158 si le coloco 1=0.9983621 2=1.998488 y no las cantidades enteras como las que estoy utilizando supongo que por eso es el problema?
Private Sub Command1_Click()
Printer.ScaleMode = vbCentimeters
Printer.CurrentY = Val(5) '5
Printer.Print "ejemplo";
MsgBox Printer.CurrentY
Printer.EndDoc
End Sub
Si en lugar de vbCentimeters utilizo vbPixels o vbCharacters devuelte cantidades enteras pero en algunos casos pasa lo mismo que en vbCentimeters y devuelve cantidades con decimales mas, decimales menos.