admin 管理员组文章数量: 1184232
2024年3月27日发(作者：c语言字符串长度怎么手动算)
２０１０年１０月 电 脑 学 习 第５期
ＶＢ中创建超长时间计时器对象
王旭诗 王冬星
摘 要：介绍在ＶＢ程序中用Ｔｉｍｅｒ控件创建一个超长时间的计时器对象。将其编译成ＡｅｔｉｖｅＸ ＤＬＬ部件．利用代码的可重用
用性。在其它应用程序中调用。
关键词：ＶＢ；计时器：对象
中图分类号：ＴＰ３１ １ 文献标识码： Ｂ 文章编号：１００２—２４２２（２０１０）０５－００２０－－０２
Ｃｒｅａｔｉｎｇ ａ Ｓｕｐｅｒ－ｌｏｎｇ Ｔｉｍｅｒ ０ｂｊｅｃｔ ｉｎ ＶＢ
Ｗａｎｇ Ｘｕｓｈｉ Ｗａｎｇ Ｄｏｎｇｘｉｎｇ
Ａｂｓｔｒａｃｔ：Ｔｈｅ ｐａｐｅｒ ｐｒｅｓｅｎｔｓ ｕｓｉｎｇ Ｔｉｍｅｒ ｃｏｎｔｒｏｌ ｉｎ ＶＢ ｔｏ ｃｒｅａｔｅ ａ ｓｕｐｅｒ－ｌｏｎｇ ｔｉｍｅｒ ｏｂｊｅｃｔ，ｗｈｉｃｈ ｃｏｕｌｄ ｂｅ ｃｏｍｐｉｌｅｄ ｉｎｔｏ
ＡｃｔｉｖｅＸ ＤＬＬ ｃｏｍｐｏｎｅｎｔｓ，ａｎｄ ｄｕｅ ｔｏ ｃｏｄｅ ｒｅｕｓａｂｉｌｉｔｙ，ａｌｓｏ ｃｏｕｌｄ ｂｅ ｃａｌｌｄｅ ｉｎ ｏｔｈｅｒ ａｐｐｌｉｃａｔｉｏｎｓ．
Ｋｅｙ ｗｏｒｄｓ：ＶＢ；Ｔｉｍｅｒ；，Ｏｂｊｅｃｔ
ＶＢ系统中提供了固有计时器Ｔｉｍｅｒ控件，通过给计时
Ｐｕｂｌｉｃ Ｐｒｏｐｅｒｔｙ Ｌｅｔ Ｉｎｔｅｒｖａｌ（ＢｙＶａｌ ｖＮｅｗＶａｌｕｅ Ａｓ Ｌｏｎｇ）
器控件的Ｉｎｔｅｒｖａｌ属性设置不同的数值，就可以控制计时器
ｅｓ＝０
运行的时间间隔，但该属性是一个双字节的整型变量，最大
ｎｚ＝ｖＮｅｗＶａｌｕｅ＼６５５３６＋ｌ
值只能设置为６５５３５，即只有６５５３５毫秒，约一分钟多一点，
ｍ Ｔｉｍｅｒ．Ｉｎｔｅｒｖａｌ＝ｖＮｅｗＶａｌＵｅ、ｎｚ
Ｅｎｄ Ｐｒｏｐｅｒｔｙ
在需要长时间计时时，该控件就无能为力了。下面给出这个
类初始化事件
超长计时器对象的编程设计过程，供读者参考选用。
Ｐｒｉｖａｔｅ Ｓｕｂ ＣＬＡＳＳ
—
Ｉｍｔｉｌａｉｚｅ０
ｌ 编写程序
Ｓｅｔ ｍ Ｆｏｒｌｎ＝Ｎｅｗ Ｆｏｒｍ１
启动ＶＢ，新建一个ＡｅｔｉｖｅＸ ＤＬＬ工程，将工程命名为
Ｌｏａｄ ｒｅ
＿
Ｆｏｒｍ
ＮｅｗＴｉｍｅｒ，将类模块名ＣｌａｓｓＩ改名为ＬｏｎｇＴｉｍｅｒ。在工程中
Ｓｅｔ ｍ Ｔｉｍｅｒ＝ｍ
＿
Ｆｏｒｍ．Ｔｉｍｅｄ
添加一个窗体Ｆｏｒｍｌ，在窗体上加入一个Ｔｉｍｅｒ计时器控件
Ｅｎｄ Ｓｕｂ
类终止事件
Ｔｉｍｅｒｌ。打开ＬｏｎｇＴｉｍｅｔ类模块。
Ｐｒｉｖａｔｅ Ｓｕｂ ＣＬＡＳＳ
＿
Ｔｅｒｍｉｎａｔｅ０ ．
ｂｒ＞Ｏｐｔｉｏｎ Ｅｘｐｌｉｃｉｔ：
Ｕｎｌｏａｄ ｍ
＿
Ｆｏｒｎｌ
Ｐｕｂｌｉｃ Ｅｖｅｎｔ Ｔｉｃｋ（） 声明事件
ｅＳｔ ｒｅ＿Ｔｉｍｅｒ＝Ｎｏｔｈｉｎｇ
‘
Ｐｒｉｖａｔｅ ｎｚ Ａｓ Ｉｎｔｅｇｅｒ
Ｅｎｄ Ｓｕｂ
Ｐｒｉｖａｔｅ ｃｓ Ａｓ Ｉｎｔｅｇｅｒ
产生Ｔｉｃｋ事件
Ｐｒｉｖａｔｅ ｍ
＿
Ｆｏｒｍ Ａｓ Ｆｏｒｍ１
Ｐｒｉｖａｔｅ Ｓｕｂ ｍ Ｔｉｍｅｒ Ｔｉｍｅｒ０
Ｐｒｉｖａｔｅ ＷｉｔｈＥｖｅｎｔｓ ｍ＿Ｔｉｍｅｒ Ａｓ Ｔｉｍｅｒ 声明对象类变量
ｅ８＝ＣＳ ４－１
返回Ｅｎａｂｌｅ属性值
Ｉｆ ｃｓ＞＝ｍ Ｔｈｅｎ
Ｐｕｂｌｉｃ Ｐｒｏｐｅｒｔｙ Ｇｅｔ Ｅｎａｂｌｅｄ（）Ａｓ Ｂｏｏｌｅａｎ
ＲａｉｓｅＥｖｅｎｔ Ｔｉｃｋ
Ｅｎａｂｌｅｄ ｍ＿Ｊｉｍｃｒ．Ｅｎａｂｌｅｄ
ＣＳ＝０
Ｅｎｄ Ｐｒｏｐｅｒｔｙ
Ｅｎｄ Ｉｆ
设置Ｅｎａｂｌｅ属性值
Ｅｎｄ Ｓｕｂ
Ｐｕｂｌｉｃ Ｐｒｏｐｅｒｔｙ Ｌｅｔ Ｅｎａｂｌｅｄ（ＢｙＶａｌ ｖＮｅｗＶａｌｕｅ Ａｓ Ｂｏｏｌｅａｎ）
窗体Ｆｏｒｍ１只用来作计时器Ｔｉｍｅｒｌ的载体，不用于显
ｅｒ
＿
Ｔｉｍｅｒ．Ｅｎａｂｌｅｄ＝ｖＮｅｗＶａｌｕｅ
刁 ｏ
Ｅｎｄ Ｐｒｏｐｅｒｔｙ
返回Ｉｎｔｅｒｖａｌ属性值
２ 测试ＮｅｗＴｉｍｅｒ．ＤＬＬ
Ｐｕｂｌｉｃ Ｐｒｏｐｅｒｔｙ Ｇｅｔ ＩｎｔｅｒｖａｌＯ Ａｓ Ｌｏｎｇ
对ＡｃｔｉｖｅＸ ＤＬＬ部件进行测试，与标准的ＥＸＥ程序一
Ｉｎｔｅｒｖａｌ＝ｍ Ｔｉｍｅｒ．Ｉｎｔｅｒｖａｌ
样，可分为单步运行或全运行。在写完所有程序代码后，建
Ｅｎｄ Ｐｒｏｐｅｒｔｙ
议用户先用ＣⅡ１＋Ｆ５进行全编译执行，发现检查ＮｅｗＴｉｍｅｒ
设置Ｉｎｔｅｒｖａｌ属性值
程序的语法错误。也可建立一个测试工程与ＮｅｗＴｉｍｅｒ链接
收稿日期：２０１０－０９—０８
｝王旭诗大庆师范学院计算机与科学技术系本科学生（黑龙江，大庆１６３０００）。
｝ 王冬星大庆师范学院计算机与科学技术系讲师（黑龙江，大庆１６３０００）。
・ ２Ｏ ・
２０１０年１０月 电 脑 学 习 第５期
“ＬｏｎＷｏｒｋｓ＂现场总线技术的开发与应用
高安邦
摘 要：本文介绍ＬｏｎＷｏｒｋｓ现场总绂技术的形成和发展、特点和优缺点、桉心技术和网络自由拓朴结构以及它的开发应用
展望与新发展趋势。
关键词：ＬＯＮ总线；ＦＣＳ；拓朴结构；开放系统；可互操作性
中图分类号：ＴＰ２７３ 文献标识码： Ａ 文章编号：１００２—２４２２（２０１０）０５—００２１－０４
Ｔｈｅ Ｄｅｖｅｌｏｐｍｅｎｔ ａｎｄ Ａｐｐｌｉｃａｔｉｏｎ ｏｆ ｔｈｅ ＬｏｎＷｏｒｋｓ ＦｉｅＩｄ—ｂｕｓ Ｔｅｃｈｎｏｌｏｇｙ
Ｇａｏ Ａｎｂａｎｇ
Ａｂｓｔｒａｃｔ：Ｔｈｅ ｐａｐｅｒ ｆｉｒｓｔ ｉｎｔｒｏｄｕｃｅｓ ｔｈｅ ｆｏｒｍａｔｉｏｎ ａｎｄ ｄｅｖｅｌｏｐｍｅｎｔ ｏｆ ｔｈｅ ＬｏｎＷｏｒｋｓ ｆｉｅｌｄ－ｂｕｓ，ａｎｄ ｄｉｓｃｕｓｓｅｓ ｉｔｓ ａｄｖａｎｔａｇｅ
ａｎｄ ｄｉｓａｄｖａｎｔａｇｅ；ｔｈｅｎ ｐｏｉｎｔｓ ｏｕｔ ｔｈｅ ＣＯｌｅ ｔｅｃｈｎｏｌｏｇｙ ａｎｄ ｎｅｔｗｏｒｋ ｔｏｐｏｌｏｇｙ ｓｔｒｕｃｔｕｒｅ，ｎａｄ ｓｉｖｅｓ ｉｔｓ ｄｅｖｅｌｏｐｍｅｎｔ Ｓ—
ｎｄ ａｐｐｌｉｃａｔｉｏｎ；ｆｉｎａｌｌｙ，ｐｕｔｓ ｆｏｒｗａｒｄ ｔｈｅ ｐｒｏｓｐｅｃｔ ａｎｄ ｎｅｗ ｄｅｖｅｌｏｐｍｅｎｔ ｔｒｅｎｄ．
Ｋｅｙ ｗｏｒｄｓ：Ｉｏｎ Ｆｉｅｌｄ—ｂｕｓ；ＦＣＳ；Ｔｏｐｏｌｏｇｙ；Ｏｐｅｎ Ｓｙｓｔｅｍ；Ｉｎｔｅｒｏｐｅｒａｂｉｌｉｔｙ
ｌ “ＬｏｎＷｏｒｋｓ”现场总线的发展
难度；Ｆｒ３１２０和Ｖ１＂３１５０智能收发器、第三代ＰＬＴ一２２电力
ＬｏｎＷｏｒｋｓ技术从诞生到现在，经历了三代产品的发
线收发器具有先进的技术和高可靠性，使得组网更加方便
展，９ｏ多种产品问世，代表性的有：
容易；采用Ｓｈｏｒｔｓｔａｃｋ微服务器，就可以将现有的设备，如
（１）第三代的开发工具，主要部分重新基于Ｗｉｎｄｏｗｓ
家用电器非常简单可靠地连接上ＬｏｎＷｏｒｋｓ网络；然后再
２０００和Ｗｉｎｄｏｗｓ ＸＰ编写，编辑资源和代码生成工具都得
利用第三代的ＬＮＳ和ｉ．Ｌ０Ｎ ＬｏｎＷｏｒｋｓ互联网联接设备系
到更新，编写插件程序的工具已更新，在编程语言上有了很
列，联接到互联网上。第三代的ＬｏｎＷｏｒｋｓ技术充分利用了
大的改进，固件已可以支持３．３Ｖ Ｎｅｕｒｏｎ芯片等。
互联网的基础机构将ＬｏｎＷｏｒｋｓ控制网推向了一个更新的
（２）ｉＬｏｎ连接无联网的产品系列。
应用层次，并与信息技术相结合，给予最终用户提供端到端
（３）应用于各种传媒介质的智能收发器系列。
的应用方案【一。
（４）企业级平台软件Ｐａｎｏｒａｍｉｘ。
ＬｏｎＷｏｒｋｓ技术自１９９３年进入中国，也取得了迅速发
（５）网络能源服务系统等。
展。２００６年被中国标准化管理委员会正式采纳为：ＧＰｅＺ
第三代产品在性能和使用上都有了巨大的改善。ｂ匕如
２０１７７—２００６中国控制联网标准和ＧＢ／Ｙ ２０２９９．４—２００６中
ＮｏｄｅＢｕｉｌｄｅｒ３开发工具由于加入了各种向导，自动生成模板
国建筑及居住区数字化技术标准。这两项国家标准的制订
和代码，同时内置对ＬｏｎＭａｒｋ的支持，节省大量开发时间和
是将ＬｏｎＷｏｒｋｓ技术推向全球控制网络的一个重要里程碑。
进行测试，针对由ＮｅｗＴｉｍｅｒ类模块提供的每个属性和事
５ 调用ＮｅｗＴｉｍｅｒ．ＤＬＬ
件，添加测试代码来测试其属性和方法 按Ｆ８，进入单步运
在应用程序中加入下述程序代码，实现参ＮｅｗＴｉｍｅｒ．ｄⅡ
行状态，逐个语句察看对ＮｅｗＴｉｍｅｒ类模块的调用情况。
的调用：
３编译ＮｅｗＴｉｍｅｒ．ＤＬＬ
Ｏｐｔｉｏｎ Ｅｘｐｌｉｃｉｔ
完成测试，排除所有错误后，从“文件（Ｆ）”菜单中选
Ｄｉｍ ＷｉｔｈＥｖｅｎｔｓ ＬｏｎｇＴｉｍｅｒｌ Ａｓ ＬｏｎｇＴｉｍｅｒ
择“生成ＮｅｗＴｉｍｅｒ．ｄⅡ（Ｋ）”命令，编译生成ＮｅｗＴｉｍｅｒ．ｄⅡ文
Ｐｒｉｖａｔｅ Ｓｕｂ ＬｏｎｇＴｉｍｅｒｌ＿Ｔｉｃｋ０
Ｐｒｉｎｔ 时间到，此处添加处理程序
件。编译成功后ＮｅｗＴｉｍｅｒ．ｄｌＪ文件将自动注册到Ｗｉｎｄｏｗｓ
Ｅｎｄ Ｓｕｂ
注册表中。
Ｐｒｉｖａｔｅ Ｓｕｂ Ｃｏｍｍａｎｄ１ Ｃｌｉｃｋ（）
４ 引用ＮｅｗＴｉｎｌｅｒ．ＤＬＬ
ＬｏｎｇＴｉｍｅｒ１．Ｉｎｔｅｒｖａｌ＝１２０００ 两分钟
ＬｏｎｇＴｉｍｅｒ１．Ｅｎａｂｌｅｄ：Ｔｒｕｅ
引用ＡｃｔｉｖｅＸ ＤＬＬ部件同引用其他对象一样，从“工程
Ｅｎｄ Ｓｕｂ
（Ｐ）”菜单中选择“引用（Ｎ）”命令，打开引用窗口，从引
参考文献
用列表中选中ＮｅｗＴｉｍｅｒ对象。如果是第一次引用Ｎｅｗ—
【１】东箭工作室．Ｖｉｓｕａｌ Ｂａｓｉｃ５．０中文版程序设计．北京：清华大
Ｔｉｍｅｒ，则在引用窗体上单击“游览（Ｂ）”命令按钮，将
学出版社，１９９７．
ＮｅｗＴｉｍｅｒ．ＤＬＬ文件添加到可引用列表框中方可使用。
【２】Ｅｖａｎｇｅｌｏｓ Ｐｅｔｒｏｕｔｓｏｓ．Ｖｉｓｕａｌ Ｂａｓｉｃ５从入门到精通．北京：电子
工业出版社，１９９７．
收稿日期：２Ｏ１ Ｏ８一Ｏ４
基金项目：中国高等教育学会“十～五”教育科学规划课题（批准号：０６ＡＩＰ００９００４６）；江苏省２００８年度高校科研成果产业化推进项目
（项目编号：ＪＨｚＤＯ８—４５）。
高安邦淮安信息职业技术学院特聘教授（江苏，淮安２２３００３），哈尔滨理工大学教授（黑龙江，哈尔滨ｌ５Ｏｏｏ１）。
・ ２１
版权声明：本文标题：VB中创建超长时间计时器对象 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/b/1711526798a598395.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论