VB6:以像素为单位获取图像大小

Question

我在表单上放了一个图片框并在上面加载了一些图片:

View1.Picture = LoadPicture(App.Path & "\sample2.bmp")

当我尝试获取图片属性的宽度和高度时，我收到的值既不是像素也不是缇。有人知道如何在 Visual Basic 6 中以像素为单位确定图像的大小吗？

Answer 1

他们在 himetrics .

用

With View1
  MsgBox .ScaleX(.Picture.Width, vbHimetric, vbPixels)
  MsgBox .ScaleY(.Picture.Height, vbHimetric, vbPixels)
End With