字体内部间距

[JCHB1234]

Private Sub Command1_Click()
Picture1.ScaleMode = vbPixels

Picture1.FontSize = 10
Picture1.Print "x"

Picture1.CurrentX = 20
Picture1.CurrentY = 0

Picture1.FontSize = 100
Picture1.Print "x"
End Sub
上面代码中，第二次打印的X，他的Y轴 虽然是0，但是他和PICTURE1的上边还有距离，怎样获取这个距离呢？第一个X的距离和第二个X的距离不一样大啊。
好像是字体内部间距。

[JCHB1234]

不是窗口边框

[bcrun]

你说的是窗口边框吧

[JCHB1234]

WORD 里，不管字号有多大差异，底部总是对齐的，PICTURE里怎实现呢

[JCHB1234]

我知道是字体的内部间隔，但不知那个API能获取到上下的间隔。

[赵4老师]

建议先在一个不可见的picture上print，然后用point函数取像素值得到所需字体内部间距。 前提是picture1.autoredraw=true