• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 238
  • Last Modified:

Help w/ UserControl and RaiseEvent

Can somebody please tell me why the dblclick event is not working.

Public Enum ButtonColor
    btnRED
    btnGREEN
    btnYELLOW
End Enum

Event DblClick()

Public Property Let Color(ByVal Color As ButtonColor)
   
    Select Case Color
        Case ledGREEN
            Green.Visible = True
            Red.Visible = False
            Yellow.Visible = False
       
        Case ledRED
            Green.Visible = False
            Red.Visible = True
            Yellow.Visible = False
       
        Case ledYELLOW
            Green.Visible = False
            Red.Visible = False
            Yellow.Visible = True
    End Select

End Property

Public Sub UserControl_DblClick()
   
    RaiseEvent DblClick

End Sub

Public Sub UserControl_Resize()

    UserControl.Width = 240
    UserControl.Height = 240

End Sub

0
pat_cunningham
Asked:
pat_cunningham
1 Solution
 
leclairmCommented:
Are you declaring the object with events???

dim withevents yourobject as classwithcustomevent

0
 
pat_cunninghamAuthor Commented:
I just figured it out.  I had images that covered the entire usercontrol and the dblclick event that was being call was the images'.
0
 
Mark_FreeSoftwareCommented:

you can ask for a refund,
see this help topic for more info:

http://www.experts-exchange.com/help.jsp#hi70
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now