画点:
创新互联专注于忠县企业网站建设,响应式网站建设,星空体育app最新版本(2024已更新)建设。忠县网站建设公司,为忠县等地区提供建站服务。全流程按需制作网站,专业设计,全程项目跟踪,创新互联专业和态度为您提供的服务
在PictureBox的Paint事件里面:
dim myGraphics=e.Graphics
Dim myPointArray As Point() = {New Point(0, 0), New Point(50, 30), New Point(30, 60)}
myGraphics.DrawPolygon(myPen, myPointArray)
画圆:
Dim g As Graphics
g = PictureBox1.CreateGraphics
g.FillEllipse(Brushes.Red, x, y, 10, 10)
Call Pset(x,y,RGB(Red,Green,Blue))
x,y是坐标
RGB是颜色
可以随时调用!!!
哦,对不起,没看清。
我没用过VB.Net,代码是没办法给你了
但我有办法:
用API函数SetPixel,SetPixelv(后者快一点)
语法参见
画点:
在PictureBox的Paint事件里面:
dim myGraphics=e.Graphics
Dim myPointArray As Point() = {New Point(0, 0), New Point(50, 30), New Point(30, 60)}
myGraphics.DrawPolygon(myPen, myPointArray)
画圆:
Dim g As Graphics
g = PictureBox1.CreateGraphics
g.FillEllipse(Brushes.Red, x, y, 10, 10)
文章题目:vb.net如何画点,vb在鼠标所点击处画点
URL分享:/article46/hcjshg.html
成都网站建设公司_创新互联,为您提供静态网站、域名注册、网站排名、星空体育app最新版本(2024已更新)、全网营销推广、网站设计
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联