PictureBoxを1個配置しています。(picturebox1)
If PictureBox1.Image.Size.Width > PictureBox1.Size.Width And PictureBox1.Image.Size.Height > PictureBox1.Image.Size.Height Then
PictureBox1.Size = New Size(PictureBox1.Image.Size)
End If
と、PictureBox1のイメージが、Picturebox1のサイズを超えたら、サイズを
イメージと同じにするプログラムです。
しかし、「オブジェクト参照がオブジェクト インスタンスに設定されていません。」と出て、停止してしまいます。
どうすれば改善されるでしょうか?
間違いを教えてください。
オブジェクトインスタンスにオブジェクト参照を設定すればいいんじゃないかな。
編集 削除PictureBox1.Image が、Nothing の状態になっていませんか?
Image プロパティに画像が割り当てられていない状態で、
画像の Size を取得しようとした場合、存在しない物のサイズを
得る事は当然できませんので、そのようなエラーとなります。
それと、"And" 演算子ではなく、"AndAlso" 演算子を使うようにしましょう。
ImageLocationでイメージをセットしても、ImageはNullのままなんですね。
Imageを直接セットしたらうまくいきました・・・。
勉強不足ですみません。
回答ありがとうございました。
最後に一つだけお聞きしたいのですが、
ImageがNullかどうか取得する方法を教えてください。
自力で解決できました
失礼いたしました。
また、解決チェックさせていただきます。