
vb中使用getpixel和setpixel函数不能直接使用吗?为什么老是报错说未定义子函数或
2个回答
展开全部
这两个函数属于Win API函数,需要之前用Declare来声明函数名和接口,你只要把下面两个函数接口定义放在最上面就可以用了。
Private Declare Function GetPixel Lib "gdi32" Alias "GetPixel" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function SetPixel Lib "gdi32" Alias "SetPixel" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long
回答补充问题:
方法一:要把声明放在所有代码的最上面,而不是你写的程序最上面。
方法二:或者新建一个模块Module,把这两个函数声明放在模块里面,并且把声明的开头Private换成Public也行。
Private Declare Function GetPixel Lib "gdi32" Alias "GetPixel" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function SetPixel Lib "gdi32" Alias "SetPixel" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long
回答补充问题:
方法一:要把声明放在所有代码的最上面,而不是你写的程序最上面。
方法二:或者新建一个模块Module,把这两个函数声明放在模块里面,并且把声明的开头Private换成Public也行。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询