20474.html
来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 23 行
HTML
23 行
<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:stupids@ms5.url.com.tw">小瓜瓜</a> on October 21, 1999 at 12:37:52:<p>In Reply to: <a href="20045.html">Re: 问一个粉笨的问题~~</a> posted by Mikasa on October 12, 1999 at 22:16:01:<p>: : 放Unload第一个form前面就可以。<p>: ㄟ..我的意思是<br>: 我第一个form的form_load()程式码是<br>: .......<br>: MMControl1.Command = "Open"<br>: MMControl1.Command = "Play"<br>: 我想要avi档run完之后,程式"自动"换到下一个from去<br>: 但是"unload form1 <br>: form2.show"<br>: 这一段程式码不知道要放在什么事件之后,才有办法自动<br>: 跳到下一个form画面?<p>我的上一个回答错了!!抱歉没看清楚你的题目<br>在Form1里加入Timer物件以判断AVI是否播完<br>Private Sub Timer1_Timer()<br> If MMControl1.Position >= MMControl1.TrackLength 'AVI是否播完的判断 Then<br> Form2.Show<br> Unload ME<br> End If<br>End Sub<br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 20474--></ul><!--end: 20474--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?