0

保存時に画像サイズを特定のサイズ (例: 150 x 200 ピクセル) に制限する方法を教えていただければ幸いです。必要な寸法が満たされていない場合は、エラー メッセージが表示されます。

ただし、次のコードは画像を画像ボックスにアップロードするコードです。

Private Sub btnUpload_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpload.Click
    Try
        OpenFileDialog1.ShowDialog()
        PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
        img = OpenFileDialog1.FileName.ToString
    Catch
    End Try
End Sub
4

1 に答える 1

1
If Image.FromFile(OpenFileDialog1.FileName).Size.Width > 150 Or Image.FromFile(OpenFileDialog1.FileName).Size.Height > 200 Then 
   lblPhotoErr.Text = "More than 150 x 200"
   bError = True
End If
于 2013-01-02T11:40:33.190 に答える