易截截图软件、单文件、免安装、纯绿色、仅160KB

vb打印

要用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 控件容器使用的单位,决定控件的大小。



相关问答:

asp.net(vb)问题

login.aspx.vb:

    Public ReadOnly Property nameT() As String
        Get
            Return TextBox1.Text
    &nb ......

vb打印问题


Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4

'初始坐标
x = 1
y = 4


'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......

如何通过 VB 获得 google 翻译的结果?

从网上找了一个版本,源代码如下:

VB code:
Option Explicit
'Global DefLang As String
Const WebURL As String = "http://translate.google.com/translate_t"
Const SearchString As Strin ......

如何用VB操作Excel转换为XML格式(介绍资料也有分)

对于EXCEL文件的内容,希望按照一定格式转换为xml文件,EXCEL内容例如:

Voucher_Id Oper Entry_Id ZhaiYao Acc_Code JieFang DaiFang fName1 fNeiRong1 fName2 fNeiRong2
1 Admin 1 测试摘要 540401 1000 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号