'Winforms Formular erstellen und Code einfügen
Public Class frmTransparent
 
    Dim WithEvents pbox As New PictureBox With _
             {.Parent = Me, .Width = 500, .Height = 300, _
              .BackColor = Me.backcolor}
 
 
 
    Private Sub frmTransparent_Load(sender As System.Object, _
        e As System.EventArgs) Handles MyBase.Load
 
        Me.TransparencyKey = Me.BackColor
        Me.Width = 505
        Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
        Me.TopMost = True
    End Sub
 
 
    Private Sub pbox_Paint(sender As Object, _
        e As System.Windows.Forms.PaintEventArgs) Handles pbox.Paint
 
        Using bmp As New Bitmap(500, 500),
            g As Graphics = Graphics.FromImage(bmp), _
            b As New SolidBrush(Color.Red)
            g.DrawString("Hier könnte Ihr Text stehen.", New Font("Arial", 20), _
              b, New Point(10, 10))
            pbox.Image = CType(bmp.Clone, Bitmap)
        End Using
 
    End Sub
End Class