vb.net中如何画点 vb在鼠标所点击处画点

vb.net怎么画不同坐标的八叉直线

[{"word":"VB.NET画直线方法\n该方法绘制一条连接由坐标对指定的两个点的线条，所以我们需要指定这两个点的坐标，如下所示、\nDrawL in e(pen,x1.y1,x2,y2)或者DrawL in e(pen,Po in t1,Poin t2)\n下面示例将在PictureBox控件表面绘制一条直线、\nDim g As\nGraphics=Me.PictureBox\n1.CreateGraphics\nDim mpen As New\nPen(Color.Red)g.DrawLin e(mpen,0,80,0,160)\n也可以使用如下代码来实现一样的甲\n__\n"}]

龙亭网站制作公司哪家好，找成都创新互联公司！从网页设计、网站建设、微信开发、APP开发、响应式网站等网站项目制作，到程序开发，运营维护。成都创新互联公司从2013年创立到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选成都创新互联公司。

vb.net 真的没法画点吗？

.NET确实没有提供画一个像素点得方法

你可以试一下用FillEllipse填充一个宽1像素，高2像素的椭圆

原理就是FillEllipse的时候，最左边那一列一般都会多出一个一像素的点；高至少要2，少了就什么都画不出来

vb.net 怎么在屏幕打点

画点：

在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里如何画点？请写出代码。

Call Pset(x,y,RGB(Red,Green,Blue))

x,y是坐标

RGB是颜色

可以随时调用!!!

哦，对不起，没看清。

我没用过VB.Net，代码是没办法给你了

但我有办法：

用API函数SetPixel，SetPixelv(后者快一点)

语法参见

求问VB.NET中（注不是VB6.0)没有画点吗，急！！求高手帮忙

Dim b As New Bitmap(320, 200)'定义图像宽高

Dim clrs As Color=Color.Black

for y as int32=1 to 199

for x as int32=1 to 319

if x=y then

clrs = Color.White'假设是对角线，x=y时使用白色

else

clrs = Color.Black'平时使用黑色

endif

b.SetPixel(x, y, clrs)'画点

next

next

b.Save("test.tif", System.Drawing.Imaging.ImageFormat.Tiff)'保存到图片文件

==================

原创例子，祝进步！！

怎样在VB.net中画一个点呢？

画点：

在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)