求一个VB自动计时程序!

camelshuan 2006-09-19 03:39:50

请各位帮忙给个VB编的自动计时程序,能够自动跑当前时间的...
如果高手能更帮忙的话,此程序能同时播放VIDEO和POWERPOINT在不同的显示器上吗?
谢谢了...

...全文

363 10 打赏收藏转发到动态举报

写回复

用AI写文章

10 条回复

切换为时间正序

请发表友善的回复…

发表回复

camelshuan 2006-10-15

打赏
举报

楼上的兄弟，不好意思。我打开您给的抵制，却说文件已经不在了。能否发到我的邮箱啊？
wo_shi_wo_de@163.com
还有一点，兄弟的代码能自动演示PPT文件吗？也就是VB程序一跑，PPT文件就自动从头播放到尾。。谢谢您啊

hohairen 2006-10-05

打赏
举报

http://www.1001m.net/dtk.php?tk=f49f98d8efec21f371f409fdeb6a0e66
我上传了,你到这里下吧

hohairen 2006-10-04

打赏
举报

哦，原来是这个意思啊。我这几天因为算题，也编了个类似的东东，电影/幻灯片什么的，都能按你设置的时间打开，我把相关代码放上来吧。

非专业开发Five 2006-10-01

打赏
举报

建议你去查找这些资料：
1、Windows Media Player控件的使用(播放MP3、电影等)
2、Timer控件的功能(仔细看看触发原理)
3、Now()函数和Format()函数结合读出系统当前时间
4、Select Case和必要的一些控件赋值。

camelshuan 2006-09-30

打赏
举报

我说的意思是 ...一个自动计时和自动轮流播放文件的程序!
譬如说.现在时 6.27,我要求播放POWERPOINT,半个小时后系统自动转换去电影,然后放完这个电影后,譬如说时晚上12点了,就自动播放PDF文件!!!整个过程全自动的!!!
我现在写的程序可以显示PDF文件,可以播放POWERPOINT了,但是播放音乐和电影还在研究中,更头痛的是我上面形容的自动播放系统!这VB程序够我头痛的,希望大家帮帮忙啊 !

hohairen 2006-09-25

打赏
举报

后一个功能没看懂，但是shell()函数可以调用运行所用文件，包括电影，比如
dim retval as variant
path1="C:\Documents and Settings\new\桌面\电影"
path2="东京爱情故事11.rm"
path=path1+path2 'path就是电影得路径

RetVal=shell("cmd.exe /k"""+path+"""",1) '引号之间没有空格

'幻灯片也一样

hohairen 2006-09-25

打赏
举报

设置timer1.intervals=1000
建一个timer控件，两个label控件
sub timer1_timer()
label1.caption=format(date,"long date")
label2.caption=format(time,"long time")
end sub

'返回年月日，以及时分秒