色について (ID:119705)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Point関数ではなくてPointメソッドでしたね。失礼しました。 Picture1とPicture2の赤い部分が重なっているということは、フォームの座標でみると同じ座標ということなので Picture1.Point(x1, y1) = vbRed Picture2.Point(x2, y2) = vbRed だとすると If x1 + Picture1.Left = x2 + Picture2.Left then If y1 + Picture1.Top = y2 + Picture2.Top then MsgBox "あたり" End If End If という感じで出来ます。