Question

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

窗体上或picture上呢 ，这个是画多边形的，不是点的啊，我说的是点啊

Answer 1

画点：
在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)

追问

DrawPolygon是画多边形的啊，我说的是画点啊

追答

不好意思，看错了，画点可以用bitmap类的SetPixel方法实现：
Private Sub PictureBox1_Click(sender As System.Object, e As System.EventArgs) Handles PictureBox1.Click
Dim bmp As New Bitmap(200, 100, Imaging.PixelFormat.Format32bppArgb)
bmp.SetPixel(10, 10, Color.Red) '在PictureBox1控件的（10，10）坐标，画一个红点
PictureBox1.Image = bmp
End Sub

Answer 2

引用xjnzhidao的回答：
画点：
在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)

其实画点就是画矩形啊，只要把边长设为一个像素就行