vb打印

Question

要用vb打印一条线，长度是100毫米怎么写？

Answer 1

Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)

Answer 2

    Printer.ScaleMode = vbMillimeters
    Printer.Line -(Printer.CurrentX + 100, Printer.CurrentY)

Answer 3

ScaleMode 属性
当使用图形方法或调整控件位置时，返回或设置一个值，该值指示对象坐标的度量单位。
语法
object.ScaleMode [= value]
ScaleMode 属性的语法包含下面部分：
部分    描述 
Object 对象表达式，其值是“应用于”列表中的一个对象。 
Value 一个指定度量单位的整数，“设置值”中有详细描述。
 设置值value 的设置值为：常数   设置值 描述 
VbUser  0    指出 ScaleHeight、ScaleWidth、ScaleLeft 和 ScaleTop 属性中的一个或多个被设置为自定义的值。 
VbTwips 1  （缺省值）缇（每逻辑英寸为 1440 缇；每逻辑厘米为 567 个缇）。 
VbPoints 2 磅（每逻辑英寸为 72 个磅）。 
VbPixels 3 像素（监视器或打印机分辨率的最小单位）。 
VbCharacters 4 字符（水平每个单位=120 缇；垂直每个单位=240 缇。） 
VbInches 5 英寸。 
VbMillimeters 6 毫米。 
VbCentimeters 7 厘米。 
VbHimetric 8 HiMetric 
VbContainerPosition 9 控件容器使用的单位，决定控件位置。 
VbContainerSize 10 控件容器使用的单位，决定控件的大小。 

Answer 4

Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)