做一个VB6.0 定时提醒 会的帮帮我

来源:百度知道 编辑:UC知道 时间:2024/05/16 11:52:30
如图所致,谁能帮帮我,万分感谢。怎么做?

要这样啊!!用下面方案肯定能成
那就用VB编一个屏保程序

,生成EXE,改成SCR文件拷到 windows\system32 里,再调用这个屏保就行了.
工程方案如下:
工程启动设为Sub Main 不要设为Form1.
一个模块 一个窗体Form1(可以用你现有的窗体稍作修改)
'模块内容:
Sub Main()
Dim cmdstr As String
cmdstr = UCase(Left(Command(), 2))
Select Case cmdstr
Case "/P"
Case "/S" '这是屏保预览和执行的代码
Form1.Show
Case "/C" '这是屏保点设置按钮代码
End Select
End Sub

'窗体Form1内容(代码我就不写了)
窗体上一个定时器,一个取消按钮
取消按钮的代码就是退出的
定时器事件代码写 调用关机命令的

基本框架就是这样,你可以多加一点显示倒计时的内容,或多加一个窗体比如Form2用来设置,就在模块的Case "/C"下面加 Form2.show就有设置界面了

VB 有一个时间控件,去把里面的方法拿出来,然后在里面判断吧,没看懂需求的路过 -.-

基本框架就是这样,你可以多加一点显示倒计时的内容,或多加一个窗体比如Form2用来设置,就在模块的Case "/C"下面加 Form2.show就有设置界面了