A way to send a frame backward on a userform

[Glory]

I can't get controls to appear over the top of a frame without actually inserting them into the frame. I can change the top and left properties so that the controls overlap the frame, but the frame is always in front.

Is it possible to get controls to appear in front of a frame?

 

[Norie]

Why use something for it's 'aestheticness' (new word) if it's not going to actually do the job?

What events are you having trouble with?

 

[Glory]

Bump.

 

[Glory]

I didn’t notice that there was a second page to this thread. I don’t want my buttons floating in the form without any frame. It looks ugly. The frame looks great, but has some drawbacks (see below).
<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o> </o>
The event I’m having trouble with is the enter and the exit event on a textbox control. When the control receives focus from outside the frame, the event does not trigger. When the control receives focus from inside the frame, the event triggers.
<o> </o>
The same occurs in reverse with the exit event. That is, if the control loses focus to a control outside the frame, then the event does not trigger.. whereas if the control loses focus to a control inside the frame, then the event does trigger.
<o> </o>
I can easily reproduce this behavior by: 1) drawing a frame in a userform; 2) drawing a textbox inside the frame; 3) drawing a button inside the frame; 4) drawing a button outside the frame.
<o> </o>
Then adding this code to the userform object module:
<o> </o>

Private Sub TextBox1_Enter()<o:p></o:p>
<o:p> </o:p>
TextBox1 = "Hey"<o:p></o:p>
<o:p> </o:p>
End Sub

<o> </o>
The code triggers when the textbox takes focus from the framed button, but not when the textbox takes focus from the button outside the frame.

 

[tusharm]

So, create an image of the frame and use the image.

Also, I almost never use events associated with userform controls (other than click) because it is impossible to guarantee that the events will occur when you expect / want them to.

Because the Enter event on the text box I have inside the frame doesn't trigger when the text box takes focus from outside the frame. Only when the user tabs/clicks between controls within the frame do any Enter events attached to those controls successfully trigger.

But I like the way the frame looks on the form. So I want the textbox to overlap the frame.

 

[Glory]

Yeah, I mentioned earlier in the thread that I was considering that. It seems like resource-overkill.

Can you think of another way to cause the following behavior?
<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o> </o>
When the user enters the textbox, if the textbox contains its default text, the default text automatically disappears. When the user exits the textbox, if the textbox contains an empty string, then the default text automatically reappears.
<o> </o>
It works great as long as the control takes focus from inside its container; eg, the frame or the form.

 

[mikerickson]

I can't reproduce the error in Excel 2004 or 2011. Have you considered testing the Frame1.ActiveControl in the Frame's Enter event?

 

[Jaafar Tribak]

Yeah, I mentioned earlier in the thread that I was considering that. It seems like resource-overkill.

Can you think of another way to cause the following behavior?
<o> </o>
When the user enters the textbox, if the textbox contains its default text, the default text automatically disappears. When the user exits the textbox, if the textbox contains an empty string, then the default text automatically reappears.
<o> </o>
It works great as long as the control takes focus from inside its container; eg, the frame or the form.

If you have only one textbox in the frame then you could try the following :

Private Const DefaultText As String = "BlaBla"

Private Sub Frame1_Enter()
    TextBox1.SetFocus
    Call ChangeText
End Sub

Private Sub Frame1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    Call ChangeText
End Sub

Private Sub ChangeText()
    With TextBox1
        If .Text = DefaultText Then
            .Text = ""
        ElseIf .Text = "" Then
            .Text = DefaultText
        End If
    End With
End Sub

 

[Glory]

I'm using '03 Pro, Mike. I can reproduce the issue every single time.

I don't know why I never considered using enter/exit events on both the frame and its controls. Doing that solved the problem.

Thanks guys.