Visual Basicの検出画像サイズ2のTextBoxの

Question

私が持っているどのような：1 OpenFileDialog、1つのPictureBox、2のTextBoxの

これは私がこれまでに得たものであるが、私はちょうどの幅を持っている方にこだわって画像は自動的に検出され、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 

ピクチャ寸法：

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

したがって：

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