> Picture1.Point(100, 100)等で、ある地点の色を取得する方法はどうすればいいのでしょうか?下記ではどうでしょうか? Open "aaa.txt" For Append As #ff Dim c As Long c = Picture1.Point(100, 100) Print #ff, c