Visual Basic中检测图像尺寸2文本框的

Question

我有什么：1打开文件对话框，1个图片框，2文本框的

这是我走到这一步，但我只是停留在如何让宽度图像将自动检测并将TextBox1中的图像宽度以像素为单位，并将TextBox2中的高度放入。

有谁知道如何做到这一点，或者我可以用它吗？在像素

Public Class Form1 
    Private sizew As Integer 
    Private sizey As Integer 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
     PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage 

     OpenFileDialog1.CheckFileExists = True 
     OpenFileDialog1.ShowReadOnly = False 
     OpenFileDialog1.Filter = "All Files|*.*|Bitmap |*.bmp;*.dib|JPEG |*.jpg;*.jpeg;*.jpe;*.jfif|TIFF |*.tif;*.tiff |PNG |*.png" 
     OpenFileDialog1.FilterIndex = 1 
     If OpenFileDialog1.ShowDialog = DialogResult.OK Then 
      PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName) 
     End If 
    End Sub 
End Class 

Answer 1

图片尺寸：

?pictureBox1.Image.Width 
526 
?pictureBox1.Image.Height 
81 

PictureBox的尺寸：

?pictureBox1.ClientSize.Width 
100 
?pictureBox1.ClientSize.Height 
50 

因此：

textBox1.Text = pictureBox1.Image.Width 
textBox2.Text = pictureBox1.Image.Height