''''pm.SetPixel(X, y, pcolor) ''''End Sub ''''当然这个代码是不能放在函数里面的了!!! End Function Public Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.WinForms.MouseEventArgs) Handles PictureBox1.MouseMove Dim PColor As System.Drawing.Color ''''声明一个color类型的变量 Dim strPC As String ''''声明一个String类型的变量 Dim cltmpA, cltmpR, cltmpG, cltmpB As String ''''声明三个String类型的变量 If apr Then Exit Sub ''''给一点时间好取定一个像素 PColor = Getpixel
文章整理:西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!




