📄 14346.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 nothing on June 17, 1999 at 09:53:53:<p>
In Reply to: <a href="14314.html">好可怕！你一定看了什么片子是吗？</a> posted by 小吴 on June 16, 1999 at 14:22:46:<p>
我是为了无法将msgbox()设成不用user按键的模式,才想要用一个form来取代msgbox(), 我是这么做的..<br>form1是用来取代msgbox()的.<br>form1 中放个 label1 用来显示讯息<br> 放个 Image1 用来显示警告图示<br> 改变form的颜色背景<br>程式如下<br>Private Sub Form_Load()<br> Me.Width = 6000<br> Me.Height = 1300<br> Me.Top = 2205<br> Me.Left = 1770<br> Label1.Caption = pMessage<br>End Sub<p>..pMessage 是公用变数<p>测试..<br>form2 中放个 command ..<br>程式如下..<br>Private Sub Command1_Click()<br> pMessage="资料输入错误!!"<br> mSTime = Timer<br> form1.Show<br> Do While Timer < mSTime + 3<br> Loop<br> Unload formDialog<br>End Sub<p>结果..form2出现时只外框跟抬头正常,其他都变成透明 的.我原本想让message show 3 秒后自己消失,不要让user老是在按mouse..可是现在连message都出不来,如果把计时程式拿掉如下..<br>Private Sub Command1_Click()<br> pMessage="资料输入错误!!"<br> mSTime = Timer<br> form1.Show<br>End Sub<br>form1.show 则一切正常..但不会自己消失..<br>就这样啰....<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 14346-->
<!--top: 14351--><li><a href="14351.html">Re: 也许你们要的透明跟我的情况不同, 不过我发现问题请你们帮忙!!</a> <b>Shadow</b> <i>10:45:30 6/17/99</i>
(<!--responses: 14351-->3)
<ul><!--insert: 14351-->
<!--top: 14353--><li><a href="14353.html">Re:用你的方法就好了..真谢谢你的帮忙...(无内文)</a> <b>nothing</b> <i>11:01:38 6/17/99</i>
(<!--responses: 14353-->0)
<ul><!--insert: 14353-->
</ul><!--end: 14353-->
<!--top: 14352--><li><a href="14352.html">Re: 也许你们要的透明跟我的情况不同, 不过我发现问题请你们帮忙!!</a> <b>Shadow</b> <i>10:55:51 6/17/99</i>
(<!--responses: 14352-->1)
<ul><!--insert: 14352-->
<!--top: 14354--><li><a href="14354.html">Re: 也许你们要的透明跟我的情况不同, 不过我发现问题请你们帮忙!!</a> <b>nothing</b> <i>11:03:47 6/17/99</i>
(<!--responses: 14354-->0)
<ul><!--insert: 14354-->
</ul><!--end: 14354-->
</ul><!--end: 14352-->
</ul><!--end: 14351-->
</ul><!--end: 14346-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -