Function 毫米转VB单位缇(X毫米 As Currency) As Long
    毫米转VB单位缇 = X毫米 * 1440 * 0.03937
    '1厘米=vb宽度 567缇
    '1英寸=2.54008厘米'
    '1毫米=0.03937英寸'
    '1英寸=1440缇(twips)
End Function