请问如何在vb中取得一个像素的r,g,b 各个分量.txt

来自「VB技巧问答10000例 VB技巧问答10000例」· 文本 代码 · 共 8 行

用 这 样 的 代 码 ： 
    Dim cColor As Long 
     
    cColor = Picture1.Point(x, y) 
    R = cColor Mod 256 
    G = cColor \ 256 Mod 256 
    B = cColor \ 256 \ 256 
<END>