VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Simple menu that becomes bold and underlined whenever the mouse steps on it.

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.

Rate Simple menu that becomes bold and underlined whenever the mouse steps on it.



  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

Download this snippet    Add to My Saved Code

Simple menu that becomes bold and underlined whenever the mouse steps on it. Comments

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..

Post your comment

Subject:
Message:
0/1000 characters