如何用API函数控制以某种颜色填充某区域？

*API函数声明Private Declare Sub FloodFill Lib "gdi32" _ (ByVal Hdc As Long, ByVal X As Long, ByVal Y As _ Long, ByVal crColor As Long注释：设(fillx,filly)为此区域内任一点注释：Color为某种颜色FloodFill Picture1.Hdc, fillx, filly,Color