📄 6068.html
字号:
<html>
<head>
<title>Re: 影像元件有办法覆盖再图片方块之上吗?</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>Re: 影像元件有办法覆盖再图片方块之上吗?</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by <a href="mailto:letsgo@ms6.url.com.tw">老怪</a> on September 27, 1998 at 21:12:22:<p>
In Reply to: <a href="5998.html">影像元件有办法覆盖再图片方块之上吗?</a> posted by 阿树 on September 25, 1998 at 04:39:52:<p>
: 小地为VB新手,请问各位先进,当image元件和picture box 元件重叠时,image元件有没有办法<br>: 覆盖再picture box 之上,我将image 其移至顶层,还是没办法再picture box之上....?<br>: 谢谢告知 <p>你把 Image 的 Container 移到 PictureBox 上即可。
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 6068-->
</ul><!--end: 6068-->
<br><hr size=7 width=75%><p>
</body></html>
22">
Name: <input type=text name="name" size=50><br>
E-Mail: <input type=text name="email" size=50><p>
Subject: <input type=text name="subject"value="Re: 上次回信有个地方您漏看了，是我问题所在" size=50><p>
Comments:<br>
<textarea name="body" COLS=50 ROWS=10>
: 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的情形
</textarea>
<p>
Optional Link URL: <input type=text name="url" size=50><br>
Link Title: <input type=text name="url_title" size=48><br>
Optional Image URL: <input type=text name="img" size=49><p>
<input type=submit value="Submit Follow Up"> <input type=reset>
<p><hr size=7 width=75%>
<center>[ <a href="#followups">Follow Ups</a> ] [ <a href="#postfp">Post Followup</a> ] [ <a href="http://www.vbqa.com/wwwboard/index.html">VBQA Board</a> ] [ <a href="http://www.vbqa.com/wwwboard/faq.html">FAQ</a> ]</center>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -