重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
画点:
让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:域名与空间、雅安服务器托管、营销软件、网站建设、沅陵网站维护、网站推广。
在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)
Pset (x, y), color
其中x,y是所画点的坐标值,color是点的颜色值,比如:
Me.PSet (100, 100), vbRed '在当前窗体的(100,100)位置画一个红色的点
又比如:
Picture1.PSet (Picture1.ScaleWidth \ 2, Picture1.ScaleHeight \ 2), vbBlue '在Picture1中的中心位置画一个蓝色的点
设置一个公用变量,初始值为1,在BUTTON的代码中,判断变量为1,则画第一个,变量加1 ,再点时,变量为2,画第二个,。。。。
.NET确实没有提供画一个像素点得方法
你可以试一下用FillEllipse填充一个宽1像素,高2像素的椭圆
原理就是FillEllipse的时候,最左边那一列一般都会多出一个一像素的点;高至少要2,少了就什么都画不出来