0

私が持っているもの：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
4

1 に答える 1

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
于 2012-05-07T02:21:37.073 に答える