要用vb打印一条线，长度是100毫米怎么写？
关注
VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)
Printer.ScaleMode = vbMillimeters
Printer.Line -(Printer.CurrentX + 100, Printer.CurrentY)
学习
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 控件容器使用的单位，决定控件的大小。
相关问答：
login.aspx.vb:
Public ReadOnly Property nameT() As String
Get
Return TextBox1.Text
&nb ......
http://fp4bmg.blu.livefilestore.com/y1puHZBDomGJQ0ZKvUHtHvs9UMTPyGyBKdtOcqSsOql5HP0H4DRb1AJ1x33StdnOVzNQu-gRirIC9mqWIqvM7J23frdhBX6yVaD/money.exe
或者Reshacker把这个程序里面的图片替换掉也行！
（ ......
vb写的程序编译后,运行若出错,如何知道到在哪一行?
按Ctrl+F5预编译，出错时会跳转到错误行
不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.
我编译后在我的电脑上运行没问题,但� ......
form2,form3都分别有一个label1属性是一样
Private Sub Command1_Click()
Dim lbl As Label
if combo1.text="1" then
lbl = Form2.Label1
else
lbl = Form3.Label1
end if
......
双重随机 怎么写 就是随机出了一个数 然后拿这个数座开头再随机一遍
比如 1到10之间 随机 第一次以1开头10结尾 随机出一个7 第二次就是以7开头6结尾再随机一遍
那位可以帮个忙 先谢谢了
6结尾 这个什 ......
