怎么判断imgSample1中是否已加载图片？？及图片的大小？？？

Question

vb中
怎么判断imgSample1中是否已加载图片？？
及图片的大小？？？大小指的是 怎么判断图片的 长*高  的大小？？

Answer 1

Private Sub Command1_Click()
    If imgSample1.Picture.Handle = 0 Then
        MsgBox "未加载图片。"
    Else
        MsgBox "已加载图片 " & Int(ScaleX(imgSample1.Picture.Width, vbHimetric, vbPixels)) & _
               "x" & Int(ScaleY(imgSample1.Picture.Height, vbHimetric, vbPixels))
    End If
End Sub

Answer 2

UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP