DOCUMENT:Q191912 27-AUG-1998 [vbwin] TITLE :BUG: Constituent Control Validate Event Can Fail on UserControl PRODUCT :Microsoft Visual Basic for Windows PROD/VER: OPER/SYS:WINDOWS KEYWORDS: ====================================================================== --------------------------------------------------------------------- The information in this article applies to: - Microsoft Visual Basic Learning, Professional, and Enterprise Editions for Windows, version 6.0 --------------------------------------------------------------------- SYMPTOMS ======== The Validate event of a constituent control fails to fire when you move the focus from the constituent control on a User Control to a control that is placed directly on a form. RESOLUTION ========== Call the ValidateControls method from the LostFocus event of the User Control. STATUS ====== Microsoft has confirmed this to be a bug in the Microsoft products listed at the beginning of this article. MORE INFORMATION ================ The Validate event occurs before the focus shifts to a control that has its CausesValidation property set to True. If you are moving focus between constituent controls on a User Control, the Validate event will fire for each control. However, if you move from a constituent control on a User Control to a control that is placed directly on a form, the Validate event of the constituent control on the User Control will not fire until focus returns to a constituent control. The workaround is to call the ValidateControls method. However, when you do this, the LostFocus for the constituent control will fire after the LostFocus event. This is the reverse of the normal event order. Steps to Reproduce Behavior --------------------------- 1. Start a new standard EXE project in Visual Basic. Form1 is created by default. 2. From the Project menu, select Add User Control. 3. Place two TextBox controls on the User Control. 4. Add the following code to the User Control: Private Sub Text1_LostFocus() Debug.Print "text1 lostfocus" End Sub Private Sub Text1_Validate(Cancel As Boolean) Debug.Print "text1 validate" End Sub Private Sub Text2_LostFocus() Debug.Print "text2 lostfocus" End Sub Private Sub Text2_Validate(Cancel As Boolean) Debug.Print "text2 validate" End Sub Private Sub UserControl_ExitFocus() ' The On Error is needed because if the Validate returns a ' False then you will receive error 380 on the ValidateControls. ' To cause the Validate event to fire when you move the focus ' from the constituent control to a control on the form, uncomment ' the following two lines: 'On Error Resume Next 'ValidateControls End Sub Private Sub UserControl_Initialize() UserControl.BackColor = RGB(0, 0, 255) End Sub 4. Place a TextBox control and UserControl1 on Form1. 5. Add the following Code to the module of Form1: Private Sub Text1_LostFocus() Debug.Print "form1 text1 lost focus" End Sub Private Sub Text1_Validate(Cancel As Boolean) Debug.Print "form1 text1 validate" End Sub 6. Save and run the project. Try moving focus from Text1 on the form to a TextBox on UserControl1. Then move focus from a TextBox on UserControl1 to Text1 on the form. The Validate for the TextBox on UserControl1 will not fire. 7. To work around this bug, add the following code to the UserControl's LostFocus event: Private Sub UserControl11_LostFocus() ValidateControls End Sub 8. Save and run the project again. Note this time that the Validate event does fire from the TextBox on the UserControl. Additional query words: kbDSupport kbDSD kbVBp kbVBp600bug kbCtrlCreate ====================================================================== Platform : WINDOWS Issue type : kbbug ============================================================================= THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY. Copyright Microsoft Corporation 1998.