Het hebben van de kennis over hoe het lettertype van een menu strip voor verlichting wijzigen kan uw Windows-toepassing meer educatieve maken . U kunt gebruik maken van Microsoft Visual Basic.NET ( VB.NET ) om een menu strip maken en wijzigen van de lettergrootte . De VB.NET is een programmeertaal . De makkelijkste manier om het lettertype te veranderen is met behulp van de MouseEnter en MouseLeave eigenschappen . Het lettertype van het eerste menu- item verandert wanneer de gebruiker de muis beweegt over het. Het lettertype zal terug naar zijn oorspronkelijke staat als de muis verlaat het menu-item . Wat je nodig hebt
Microsoft Visual Basic Express
Toon Meer Aanwijzingen
1 Start Microsoft Visual Basic Express , klikt u op " New Project ... " aan de linkerkant van uw scherm , selecteer " Windows Forms Application . " Klik op "OK . "
Dubbelklik op " MenuStrip1 " 2 om een menu strip controle toe te voegen . Klik " hier Typ " op het menu strip controle en type " Bestand. " Klik naast " File " en type " Opties".
3 Dubbelklik op " File " om de " Form1.vb " module te openen . Druk op " Ctrl " en " A " dan " Delete " om alle bestaande code te verwijderen
Kopieer 4 en plak de code hieronder in uw " Form1.vb " module : . Public
class Form1
Private Sub FileToolStripMenuItem_MouseEnter ( ByVal afzender als Voorwerp , ByVal e als System.EventArgs ) Handles FileToolStripMenuItem.MouseEnter Me.MenuStrip1.Items
( 0 ) . Font = New Font ( " Georgia " , 16 ) End Sub Private Sub FileToolStripMenuItem_MouseLeave ( ByVal afzender
als Voorwerp , ByVal e als System.EventArgs ) Handles FileToolStripMenuItem.MouseLeave Me.MenuStrip1.Items
( 0 ) . Font = New Font ( " Segoe UI " , 9 ) End Sub Private Sub OptionsToolStripMenuItem_MouseEnter ( ByVal afzender
als Voorwerp , ByVal e als System.EventArgs ) Handles OptionsToolStripMenuItem.MouseEnter < br Me.MenuStrip1.Items ( 1 ) > . Font = New Font ( " Georgia " , 16 ) End Sub Private Sub OptionsToolStripMenuItem_MouseLeave ( ByVal afzender
als Voorwerp , ByVal e als System.EventArgs ) Handles OptionsToolStripMenuItem.MouseLeave Me.MenuStrip1.Items
( 1 ) . Font = New Font ( " Segoe UI " , 9 ) End Sub
end klasse
Druk " F5 " 5 om uw programma te draaien beweegt dan de muis over het menu strip om de wijzigingen lettertype zien .
|
