Рисование точки на экране

Вы не можете использовать метку в качестве курсора как таковую, но вы можете добавить компонент Label в свою форму и перемещать его синхронно с курсором с помощью фильтра сообщений, например:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles MyBase.Load

        Application.AddMessageFilter(New LabelMoveFilter)

    End Sub

    Private Class LabelMoveFilter
        Implements IMessageFilter

        Public Function PreFilterMessage(ByRef m As Message) As Boolean _
            Implements IMessageFilter.PreFilterMessage

            'If the message is &H200 (WM_MOUSEMOVE), reposition the label to
            'where the cursor has moved to

            If m.Msg = &H200 Then
                Form1.Label1.Location = Form1.PointToClient(Cursor.Position)
            End If

            'Return false so that the message is passed on to the form

            Return False

        End Function

    End Class

End Class

Компонент Label (в этом примере Label1) ничего не перезапишет в вашей форме, он просто будет располагаться сверху. Просто убедитесь, что метка находится перед всеми другими компонентами формы, чтобы она не скользила ни за что другое. Затем вы можете просто установить текст метки на все, что вам нужно, когда это необходимо.

Обновлено: чтобы ответить на другую часть вашего вопроса ...

Чтобы получить и установить произвольные пиксели на экране, вы можете использовать функции Windows GDI GetPixel и SetPixel. Импортируйте их так:

Private Declare Function GetDC Lib "user32" Alias "GetDC" (ByVal hwnd As Integer) As Integer
Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Integer, ByVal x As Integer, ByVal y As Integer) As Integer
Private Declare Function SetPixel Lib "gdi32" (ByVal hdc As Integer, ByVal x As Integer, ByVal y As Integer, ByVal crColor As Integer) As Integer

затем назовите их так:

color = ColorTranslator.FromOle(GetPixel(GetDC(0), x, y))

и

SetPixel(GetDC(0), x, y, ColorTranslator.ToOle(color))

Где x и y - координаты экрана (не формы), а цвет - это цвет для чтения / установки. Вы можете получить X / Y курсора, используя Cursor.Position.X и Cursor.Position.Y, если это те X и Y, которые вам нужны. Вы можете использовать методы PointToScreen и PointToClient для преобразования из формы в экран и экрана в координаты формы соответственно.

Обратите внимание, что любые установленные вами пиксели будут перезаписаны, как только они будут перерисованы. И обратите внимание, что они будут читать / писать и вне вашей формы, так что будьте осторожны.