1774.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 22 行

HTML
22
字号
<html>  <head>    <title>Re: 使用marquee control的方式来放.gif动画</title>  </head>  <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK="">    <center>      <h1>Re: 使用marquee control的方式来放.gif动画</h1>    </center><HR><p>Posted by <a href="mailto:cww5@mail.ncku.edu.tw">cww</a> on January 21, 1998 at 18:26:47:<p>In Reply to: <a href="1763.html"><b>没见过</b></a> posted by 小吴 on January 21, 1998 at 01:37:40:<p>小弟曾被问过相同的问题,结果用marquee control来完成,程式码如下:<br>上面的程式码属于 marquee control的部份不可在property window中设定<br>,否则没有效用<p>Private Sub Form_Load()<br>Form1.ScaleMode = 3<br>Marquee1.DrawImmediately = 0<br>Marquee1.ScrollPixelsX = 0<br>Marquee1.ScrollPixelsY = 0<br>Marquee1.insertURL 0, "c:\tmp2\star.gif"<br>                     '^^^^^^^^^^^^^^^^^<br>                     'Insert the .gif that you want to show<br>End Sub<p>Private Sub Marquee1_OnStartOfImage()<br>Marquee1.Height = Marquee1.PageHeight<br>Marquee1.Width = Marquee1.PageWidth<br>End Sub<p><p><br><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 1774--></ul><!--end: 1774--><br><HR><p></body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?