请教VB高手一个picture像素问题

[复制链接]
查看11 | 回复1 | 2009-4-4 15:01:02 | 显示全部楼层 |阅读模式
Picture1.Point(dX3, dY3)为一个点,即picture1的scalemode为pixel。我想实现下列语句怎么办呢:
ifthen

text1.text=3
end if

回复

使用道具 举报

千问 | 2009-4-4 15:01:02 | 显示全部楼层
if Picture1.Point(dX3, dY3)&HFFFFFF then '不是白色 Dim color As Long Dim R As Long Dim G As Long Dim B As Long color = Picture1.Point(dX3, dY3) R = color And &HFF '分离出红色 G = (color And &HFF00&) \ 256& '分离出绿色 B = (color And &HFF0000) \ 65536& '分离出蓝色...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行