Dim Schrift As System.Drawing.Font
        Dim Rot As New SolidBrush(Color.Red)
 
 
        Try
            Grafik.DrawString("0 Uhr", Schrift, Rot, 400, 20)
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try