ต้องการตรวจสอบ ขนาดของภาพเมื่อเลือกไฟล์จาก OpenFileDialog

If New FileInfo(OpenFileDialog1.FileName).Length > 25 * 1024 Then ... 'More than 25KB'
Dim img = Image.FromFile(OpenFileDialog1.FileName)
If img.Size.Width > 150 OrElse img.Size.Height > 150 Then ... 'More than 150x150'
Picturebox1.Image = img

OpenFileDialog1.ShowDialog()
pic = New Bitmap(OpenFileDialog1.FileName)
PictureBox1.Image = pic