UC知道vb 一个关于checkbox的问题。
来源：百度知道 编辑：UC知道 时间：2024/06/03 21:29:31
hDC=GetDC(0)
color=GetPixel(hdc,333,333)
debug.print hex（color）
上面是判断坐标点颜色的代码
请问如何写选中checkbox则执行
取消选中checkbox则停止执行？
color=GetPixel(hdc,333,333)
debug.print hex（color）
上面是判断坐标点颜色的代码
请问如何写选中checkbox则执行
取消选中checkbox则停止执行？
写在checkbox点击事件里面比较节省资源与时间。
Private Sub Check1_Click()
If Me.Check1.Value = 1 Then
hDC=GetDC(0)
color=GetPixel(hdc,333,333)
debug.print hex（color）
End If
End Sub
这个应该是在一个timer里面的吧？
if check1.value = vbchecked then
hDC=GetDC(0)
color=GetPixel(hdc,333,333)
debug.print hex（color）
end if
即可