Vb.net 在我的表格上画满分数

我想在我的表格上画1个点

例如：

1pxBlack 1pxwhite 1pxBlack 1pxwhite 1pxBlack 1pxwhite 
1pxBlack 1pxwhite 1pxBlack 1pxwhite 1pxBlack 1pxwhite 
1pxBlack 1pxwhite 1pxBlack 1pxwhite 1pxBlack 1pxwhite 

    Dim bmp As New Bitmap(Me.Width, Me.Height)
    For y = 0 To Me.Height - 1
        For x = 0 To Me.Width - 1
            If x Mod 2 = 0 And y Mod 2 = 0 Then
                bmp.SetPixel(x, y, Color.Black)
            Else
                bmp.SetPixel(x, y, Color.White)
            End If
        Next
    Next
    Me.BackgroundImage = bmp

---

您可以使用

setPixel

例如：

1pxBlack 1pxwhite 1pxBlack 1pxwhite 1pxBlack 1pxwhite 
1pxBlack 1pxwhite 1pxBlack 1pxwhite 1pxBlack 1pxwhite 
1pxBlack 1pxwhite 1pxBlack 1pxwhite 1pxBlack 1pxwhite 

    Dim bmp As New Bitmap(Me.Width, Me.Height)
    For y = 0 To Me.Height - 1
        For x = 0 To Me.Width - 1
            If x Mod 2 = 0 And y Mod 2 = 0 Then
                bmp.SetPixel(x, y, Color.Black)
            Else
                bmp.SetPixel(x, y, Color.White)
            End If
        Next
    Next
    Me.BackgroundImage = bmp

---

你试过什么吗？