[原创]在窗体中滚动播放图片

清风_ll · 发表于 2005-8-6 10:23

在窗体中滚动播放图片,具有通用性,可直接往里加入图片,试试吧 [em10]

P7XOAjcF.rar (49.17 KB, 下载次数: 895)

[em45][em42][em48]

清风_ll · 发表于 2005-8-6 10:39

以下是引用plxmm在2005-8-6 10:28:57的发言： 清风_ll 大师：Stop 按钮点击后可否改变为 Play 吖。

Plxmm 千万别这么称呼我,停止心跳了啊[em04]

只是演示播放功能,如果要实现要求只需把按钮单击事件改一下就可以了

Private Sub CommandButton1_Click() bPlay = Not bPlay With CommandButton1 .Caption = IIf(.Caption = "Stop", "Play", "Stop") End With Call UserForm_Activate End Sub

清风_ll · 发表于 2005-8-6 10:51

以下是引用plxmm在2005-8-6 10:44:54的发言： 还有点奇怪的事：Stop 按钮点下去，弹起来慢，转换为 Play 也慢呢？[em04]

因为代码中使用了Sleep函数,如果在Sleep函数作用期间点点按钮,要等到Sleep函数结束后才能执行,在图片滚动时点击按钮才不会有停滞现象

来生缘 · 发表于 2005-8-6 12:28

收下研究

bbmouse · 发表于 2005-8-6 13:42

好东西，收下了，

liu2004 · 发表于 2005-8-6 15:52

清风_ll 大师：图库ImageList在哪里找啊.

[此贴子已经被作者于2005-8-6 15:52:51编辑过]

清风_ll · 发表于 2005-8-6 20:30

以下是引用liu2004在2005-8-6 15:52:18的发言： 清风_ll 大师：图库ImageList在哪里找啊.

选中imagelist控件,在属性窗口中选择自定义...

shishi · 发表于 2005-8-7 11:06

精彩

青山依旧 · 发表于 2005-11-26 20:13

清风大师这个好玩,收下来玩玩.

tiedan · 发表于 2007-1-7 22:26

斑竹,怎么回事?

[此贴子已经被作者于2007-1-7 22:26:47编辑过]

		自动登录	找回密码
密码			免费注册

[原创]在窗体中滚动播放图片

点评

评分

最新热点 /1