社区
VB基础类
帖子详情
一个vb程序怎样使它每隔5分钟运行一次?
hkdavis
2000-06-28 12:18:00
程序名为vbrun.exe
如何使个VB程序在系统中从9:00开始每隔5分钟运行一次;到17:00结束(50fen)
1系统配置?(50)
2程序如何设计,原代码?(100)
...全文
707
16
打赏
收藏
一个vb程序怎样使它每隔5分钟运行一次?
程序名为vbrun.exe 如何使个VB程序在系统中从9:00开始每隔5分钟运行一次;到17:00结束(50fen) 1系统配置?(50) 2程序如何设计,原代码?(100)
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
16 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
jienao
2000-06-28
打赏
举报
回复
我想可能只有象很多的杀毒软件那样,必须先运行程序,然后用定时器触发某功能的运行。
hkdavis
2000-06-28
打赏
举报
回复
xiexiem ge wei!
mingtian gei fen
jianhuacai
2000-06-28
打赏
举报
回复
不如装上WIN2000用TASK 连程序都不用便
cherami
2000-06-28
打赏
举报
回复
Timer有个属性是定义它的时间间隔的,程序中的timer1.inteval = 60000
即是设置那个间隔的大小的。单位是毫秒。如果你认真的分析一下程序你就应该能知道那两个值是什么意思了。sgnt是Timer的累计时间值,而sngOldTime是当计时到5分钟的时候记录Timer的值,为下一次计算计时间隔做准备。看看那个计算式。我想你能看懂的。
Un1
2000-06-28
打赏
举报
回复
timer返回从0点到现在得秒数的单精度值。程序的意思是每隔大约一秒检测一次从午夜到现在的秒数,如果在上午9点和下午5点之间且和前次进入的时间间隔大于或等于5分种时就call function.
hkdavis
2000-06-28
打赏
举报
回复
vb里timer的值怎么为53813.45 什么意思? 能否给我谈谈timer值的意义?
hkdavis
2000-06-28
打赏
举报
回复
您好:这个我知道,
我是问
上面定义的 sngt,sngoldtime是什么意思?且为单精度我更不懂了,还有上面的sngoldtime总为0,sngt为53108.47这是什么意义?
sngt = Timer
sngOldTime=sngt呢?
Wonny
2000-06-28
打赏
举报
回复
时间变量!源程序都给出了,自己想想不就行了?
cherami
2000-06-28
打赏
举报
回复
你可以查看MSDN,里面有例子。Timer是VB里的一个控件,你可以设置他的时间间隔,但有最大值,好象是1000毫秒,即1秒,你自己查查看吧。
hkdavis
2000-06-28
打赏
举报
回复
我调试时基本正确,请解释一下:
上面定义的 sngt,sngoldtime是什么意思?
sngt = Timer
sngOldTime=sngt
是什么意思?
Un1
2000-06-28
打赏
举报
回复
怎么提交有问题!
Un1
2000-06-28
打赏
举报
回复
'例如:
'注意!程序未经调试!
private sub Form_Load
timer1.inteval = 60000
end sub
private sub Timer1_Timer
static sngOldTime as Single
dim sngt as Single
sngt = Timer
if sngt>=9*3600! then
if sngt<17*3600! then
If abs(sngt-sngOldTime)>=5 then
sngOldTime=sngt
call function1
end if
end if
end if
end sub
private function function1()
....
end function
Un1
2000-06-28
打赏
举报
回复
'例如:
'注意!程序未经调试!
private sub Form_Load
timer1.inteval = 60000
end sub
private sub Timer1_Timer
static sngOldTime as Single
dim sngt as Single
sngt = Timer
if sngt>=9*3600 then
if sngt<17*3600 then
If abs(sngt-sngOldTime)>=5 then
sngOldTime=sngt
call function1
end if
end if
end if
end sub
private function function1()
....
end function
hkdavis
2000-06-28
打赏
举报
回复
这个我知道,能不能说一些关键的有用的有价值的代码?
Un1
2000-06-28
打赏
举报
回复
private sub Form_Load
end sub
hkdavis
2000-06-28
打赏
举报
回复
正是如此,我是初学者。我想学习如何触发定时器事件。
比如每隔5分钟触发一个函数function1,如何写愿代码?
而且控制在17:00结束程序。
请给原代码,你自己想一些名称吧。
我主要目的是想学习如何到一定时间触发一个事件的原代码如何写?谢谢!
Vb
定时提醒软件-
每隔
指定时间弹出提示发出提示音.rar
为保护眼睛而专业编写的
Vb
定时提醒软件-
每隔
指定时间弹出提示发出提示音,写本软件的初衷是
一个
护眼软件,当面对电脑至设定的小时后,即会触发
程序
弹出提示,或发出警报音,可自定义休息时间结束时(工作时的声音提示),每
分钟
一次
的眨眼提示(可以关闭眨眼提示),工作时间结束时(休息时的声音提示),托盘图标动画显示,每
分钟
语音提示“请眨眨眼睛”,随机
运行
屏幕保护
程序
(每次见到的屏幕保护可能不一样)
vb
.net设计的:自动
运行
任务计划
一位朋友说。他的电脑要每
一个
小时自动打开
一个
程序
。想到用系统自带的那个任务计划。达不到我要的效果。于是自己写
一个
这样的
程序
。让
程序
在某
一个
时间开始。
每隔
一个
时间段就自动
运行
选择的
程序
。可以只
运行
一次
或者多次。 用到的知识点: 正则表达式,时间的比较,两个Timer互调。启动windows时自动
运行
本
程序
的设置(修改注册表..CurrentVersion\Run),Process打开新
程序
、强制结束进程。
程序
和界面说明:http://blog.csdn.net/linjimu/archive/2008/10/06/3023532.aspx
VB
程序
设计入门基础
VB
入门基础。清楚易懂,适合初学者本课程主要从开发环境、窗体、命令按钮、文本框、标签、消息框和输入框、代码基础、选择结构、循环结构、数组、过程、控件等方面进行讲解
VB
试题.doc
VB
试题.doc 一、 填空题 1.VB中若要产生一消息框,可用__msgbox__函数来实现。 2.常量是指在
程序
运行
过程中, 其值不能改变 的量。 3.整数类型数据分别包括整型和 长整型 数据。 4、在VB集成开发环境中,
运行
应用
程序
的方法有三种:一是_单击“
运行
”菜单下的启动_;二是_单击工具栏上的启动按钮;三是_按F5键 。 5、在VB中若要让某对对象获取焦点,则可通过__ Setfocus_方法来实现。 6.列表框(ListBox控件)显示 项目列表 ,用户可从中选择
一个
或多个项目。 7.框架(Frame控件)可以用来 对其它控件 进行分组,以便于用户识别,主要用于为单选按钮分组。 8、在VB中,用来描述对象外部特征的量称之为对象的_属性__。 9、为使某窗口中的命令按钮“取消(C)”具有如下特性:按“Alt+C”键或按 “ESC” 键,均可代替用鼠标单击该按钮的操作,应设置该按钮的Caption属性值为_取消(&C)___,并且设置其_ Cancel__属性值为__ True__。 10、在过程内用_ Static__声明的变量为静态变量,在执行
一个
过程结束时,过程中所用到的 Static变量的值会保留,下次再调用此过程时,变量的初值是上次调用结束时被保留的值。 11、在模块文件中的声明部分用Global或__ Dim__关键字声明的变量为全局变量。 12、在模块文件中的声明部分用__ Dim__或__ Private__定义的变量为模块级变量。 13.计时器控件通过定期激活Timer事件,使得Timer控件 可以
每隔
一个
时间段 就执行
一次
Timer事件中的代码。 14.要获得滚动条的当前位置,可以访问通过 Value 属性来实现。 15.关闭正在
运行
的
VB
窗口将自动触发的事件是 Unload 。 二、选择题 1.工程文件的扩展名是( B )。 A.
vb
g B.
vb
p C.
vb
w D.
vb
l 2.在以下窗体中没有采用的控件是( B )。 A.文本框 B 垂直滚动条 C.框架 D 命令按钮 3.滚动条控件(如图所示)的Largechange属性所设置的是( A ) A. 单击滚动条和滚动箭头之间的区域时,滚动条控件Value属性值的改变量 B. 滚动条中滚动块的最大移动位置 C. 滚动条中滚动块的最大移动范围 D. 滚动条控件无该属性 4、用于从字符串左边截取字符的函数是( A ) A、Ltrim( ) B、Trim( ) C、Left( ) D、Instr( ) 5、可获得当前系统日期的函数是( A )
VB
A时间间隔重复执行
程序
关于
VB
A Application.OnTime用法 application.ontime |举报 |字号 订阅 Application.OnTime可实现定时执行
vb
a
程序
。在
vb
.net中可定时执行windows
程序
。 下面介绍定时执行
vb
a
程序
过程: 1.Application.OnTime参数 Application.OnTime(EarliestTime,Procedure as String,[LatestTime],[Schedule]) EarliestTime调用
程序
的时间 Procedure调用
程序
的
程序
名,类型String LatestTime
程序
执行的结束时间,可选,默认不停调用 Schedule默认True:预定新的调用过程,False非预定调用新的过程 2.举例 Sub fslk() '本
程序
在每天的12点
运行
yourproc过程" Application.OnTime _ EarliestTime:=TimeValue("12:00:00"), _ Procedure:="YourProc" End Sub '被调用
程序
Sub yourpc() Cells.(1, 2).Value = 4423 End Sub 3.循环调用
程序
自身,并设置调用时间举例 Option Explicit '公共变量说明 Dim endtime As String Sub oneminute() '主
程序
endtime = Now + TimeValue("00:01:00") Call updateself End Sub Sub updateself() '被调用
程序
Sheet1.Cells(4, 3).Value = Format(Now(), "hh:mm:ss") Application.OnTime Now + TimeValue("00:00:01"), "updateself", endtime, True End Sub 此例子在单元格C4读秒持续显示,显示时间长度1
分钟
http://wenku.baidu.com/link?url=vgi6RL7p_2TqF7B-okY4Z-6glN-wjRcMw9UzBjf7yZrLLPztBNAdllM5u__bwkKxgyGdELCy1Lsz7PVYJxBkEPybO64LFAKxMtn9JeKoUTG
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章