Avere la conoscenza su come modificare il carattere di una barra di menu per l'illuminazione può rendere la vostra applicazione di Windows più educativo . È possibile utilizzare Microsoft Visual Basic.NET ( VB.NET ) per creare una barra di menu e modificare la dimensione del carattere . Il VB.NET è un linguaggio di programmazione di computer . Il modo più semplice per cambiare il tipo di carattere è quello di utilizzare la proprietà MouseEnter e MouseLeave . Il font della prima voce di menu cambia quando l'utente sposta il mouse su di esso . Il font tornerà al suo stato originale quando il mouse esce la voce di menu . Cose che ti serviranno
Microsoft Visual Basic Express
Mostra più istruzioni
1
Avviare Microsoft Visual Basic Express , fai clic su " Nuovo progetto ... " nel riquadro sinistro dello schermo , quindi selezionare " Applicazione Windows Form ". Fare clic su "OK".
2
doppio clic su " menuStrip1 " per aggiungere un controllo barra di menu . Fare clic su " Digitare qui " sul controllo barra di menu e il tipo "File ". Fare clic su accanto a " File " e digitare " Opzioni ".
3
doppio clic su " File" per aprire il modulo " Form1.vb " . Premere il tasto " Ctrl " e "A " e poi "Elimina " per rimuovere tutto il codice esistente
4
Copia e incolla il codice sottostante nel tuo modulo " Form1.vb " : .
Pubblica Class Form1 private Sub
FileToolStripMenuItem_MouseEnter ( ByVal sender As Object , ByVal e As System.EventArgs ) Handles FileToolStripMenuItem.MouseEnter
Me.MenuStrip1.Items ( 0 ) . Font = New Font ( " Georgia " , 16 ) per
End Sub private Sub
FileToolStripMenuItem_MouseLeave ( ByVal sender As Object , ByVal e As System.EventArgs ) Handles FileToolStripMenuItem.MouseLeave
Me.MenuStrip1.Items ( 0 ) . Font = New Font ( " Segoe UI " , 9 ) per
End Sub private Sub
OptionsToolStripMenuItem_MouseEnter ( ByVal sender As Object , ByVal e As System.EventArgs ) Handles OptionsToolStripMenuItem.MouseEnter < br
Me.MenuStrip1.Items > ( 1) . Font = New Font ( " Georgia " , 16 ) per
End Sub private Sub
OptionsToolStripMenuItem_MouseLeave ( ByVal sender As Object , ByVal e come System.EventArgs ) Handles OptionsToolStripMenuItem.MouseLeave
Me.MenuStrip1.Items ( 1) . Font = New Font ( " Segoe UI " , 9 ) per
End Sub
Classe
End 5
Premere " F5 " per eseguire il programma poi spostare il mouse sopra la barra di menu per vedere i cambiamenti di font .