# Re: 影像元件有办法覆盖再图片方块之上吗?

Posted by 老怪 on September 27, 1998 at 21:12:22:

In Reply to: 影像元件有办法覆盖再图片方块之上吗? posted by 阿树 on September 25, 1998 at 04:39:52:

: 小地为VB新手,请问各位先进,当image元件和picture box 元件重叠时,image元件有没有办法
: 覆盖再picture box 之上,我将image 其移至顶层,还是没办法再picture box之上....?
: 谢谢告知

你把 Image 的 Container 移到 PictureBox 上即可。

Follow Ups:

22"> Name:
E-Mail:

Subject:

Comments:
: OK, 请试一试 : : Private Sub Text1_LostFocus() : if gbStdActivateByUser() then : MsgBox "text1 LOSTFOCUS" : Text1.SetFocus : end if : End Sub : Private Sub Text2_LostFocus() : if gbStdActivateByUser() then : MsgBox "text2 LOSTFOCUS" : Text2.SetFocus : end if : End Sub : Function gbStdActivateByUser () As Integer : 'Check whether control is activated by user action : 'Check the state of Tab, Left mouse button, Numpad 4 and Numpad 6 which change the control focus : 'If value of GetKeyState() function < 0, that means one of these keys is pressed : gbStdActivateByUser = (GetKeyState(KEY_TAB) < 0 Or GetKeyState(KEY_LBUTTON) < 0 Or : GetKeyState(KEY_NUMPAD4) < 0 Or GetKeyState(KEY_NUMPAD6) < 0) : End Function : 另:其实不用 msgbox() 可能会好一点，将 error message 显示在 status bar 上并加上 beep 可能会好一点。 : : Q: 当您写在lostfocus事件中，虽然您将资料检查程式段放在另一个subroutine，但当资料检查不过时您一样也是要将focus设在原来之栏位，那不是跟我原来的程式码中text1.setfocus是一样的意思了吗？可否就原来那个简单的程式码搭配您的方法加以改写说明一下呢？看如何才不会造成无穷回圈，而且需能适用有多个textbox喔！而不是只针对两个textbox的情形

Optional Link URL:
Link Title:
Optional Image URL:

[ Follow Ups ] [ Post Followup ] [ VBQA Board ] [ FAQ ]