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

Question

我在表格上放了一个图片框并在上面加了一些图片：

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

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

Answer 1

他们在himetrics。

使用

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