Option Strict On Option Explicit On Option Infer Off Public Class Form1 Private Sub Form1_Paint(sender As Object, e As PaintEventArgs) Handles Me.Paint Dim g As Graphics = e.Graphics g.DrawString("Hello world", New Font("Consolas", 12), Brushes.Red, New Point(10, 10)) End Sub End Class