by AgentPogs(Mr. Technics) (1 Submission)
Category: Graphics
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Tue 12th June 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Simple menu that becomes bold and underlined whenever the mouse steps on it.
API Declarations
Use control array to do this.
All you have to do is to place a label control in a form, and copy paste it as many as you want.
For a = Label1.LBound To Label1.UBound
Label1(a).FontBold = False
Label1(a).FontUnderline = False
Next a
Label1(Index).FontBold = True
Label1(Index).FontUnderline = True
End Sub
Private Sub Label1_Click(Index As Integer)
Select Case Index
Case 0
'{you can place your syntax here to do some...}
Case 1
'{you can place your syntax here to do some...}
'Case etc...
End Select
End Sub
No comments have been posted about Simple menu that becomes bold and underlined whenever the mouse steps on it.. Why not be the first to post a comment about Simple menu that becomes bold and underlined whenever the mouse steps on it..