Rubrik: Fenster & Forms | 01.08.03 |
Text direkt auf der Form ausgeben (VB.NET) VB-Version: VB5, VB6 | ||
Views: 15.899 |
In VB 6 konnte man mittels der Print-Anweisung Text direkt auf der Formausgeben lassen. Das sah dann ungefähr so aus:
Private Sub Form_Load() Print "Hallo" End Sub
Wenn man nun das Projekt startete, pappte das Wort Hallo links oben in derEcke - vorausgesetzt man hatte nicht vergessen die Form-Eigenschaft AutoRedrawauf True zu setzen.
Wie geht es nun in VB.NET? Die Print-Anweisung schreibt hier nur noch inDateien. Also wie bekomme ich jetzt Text auf die Form ohne dass ich ein Labeloder sonst was dazu brauche? Es geht noch - allerdings wieder mal ein bisschenanders. DaveS hat es uns ins .NET-Forum gestellt. Hier der Code, den Sie direktin die Public Class Form1 einfügen:
Protected Overrides Sub OnPaint( _ ByVal e As System.Windows.Forms.PaintEventArgs) Dim sb As SolidBrush = New SolidBrush(Color.Red) e.Graphics.DrawString("Hi there!", Me.Font, sb, 50, 50) End Sub
Versuchen Sie es einfach mal.