VB设计有语音报时和报警功能的闹钟
日期:2008年4月9日 作者: 查看:[大字体 中字体 小字体]-
MMControl1.Commond = “ Open ”
MMControl1.Commond = “ Play ”
Case 5
MMControl1.FileName = App . Path & “ 5.wav ”
MMControl1.Commond = “ Open ”
MMControl1.Commond = “ Play ”
Case 6
MMControl1.FileName = App . Path & “ 6.wav ”
MMControl1.Commond = “ Open ”
MMControl1.Commond = “ Play ”
Case 7
MMControl1.FileName = App . Path & “ 7.wav ”
MMControl1.Commond = “ Open ”
MMControl1.Commond = “ Play ”
Case 8
MMControl1.FileName = App . Path & “ 8.wav ”
MMControl1.Commond = “ Open ”
MMControl1.Commond = “ Play ”
Case 9
MMControl1.FileName = App . Path & “ 9.wav ”
MMControl1.Commond = “ Open ”
MMControl1.Commond = “ Play ”
Case 10
MMControl1.FileName = App . Path & “ 10.wav ”
MMControl1.Commond = “ Open ”
MMControl1.Commond = “ Play ”
Case 11
MMControl1.FileName = App . Path & “ 11.wav ”
MMControl1.Commond = “ Open ”
MMControl1.Commond = “ Play ”
End Select
MMControl1.Commond = “ Close ”
End Sub
不知道你的机子是否还能运行良好.毕竟再短短的一秒钟内,我们让计算机做的事情太多了.为了提高效率,我们可以考虑使用API函数.
我们先来看一下所要用到的相关知识.
(2) 相关API函数
1、 GetLocalTime()
VB声明:Declare Sub GetLocalTime Lib " kernel32 " Alias " GetLocalTime " ( lpSystemTime As SYSTEMTIME )
说明:在lpSystemTime结构中装载本地日期和时间
参数:GetLocalTime函数只有一个参数lpSystemTim,指向SYSTEMTIME结构,用于装载本地时间的结构。
2、SYSTEMTIME结构
定义:
Public Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type
说明:SYSTEMTIME结构表示一个日期和时间,年、月、日、星期、时、分、秒、毫秒各用一个成员来表示。其中wYear 为Integer型,表示当前的年份;wMonth 为 Integer型,表示当前的月份,从1月到12月分别用1到12来表示; wDayOfWeek 为 Integer型,表示当前的星期,从星期日开始,分别用0到6个数表示; wDay 为 Integer型,表示当前的日期; wHour 为 Integer型,表示当前的时刻; wMinute 为 Integer型,表示当前的分钟; wSecond 为 Integer型,表示当前的秒; wMilliseconds 为 Integer型,表示当前的毫秒。 - 上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] 下一页
-
- VB设计有语音报时和报警功能的闹钟 相关文章:
- ·Windows Vista系统常用补丁功能介绍
- ·将最广泛的网络安全功能整合在一个系统中
- ·Windows Vista SP1改进功能完全介绍
- ·Windows Vista SP1 RC新功能初体验
- ·QQ会员与众不同 37项独有特权功能一览
- ·微调Vista“用户帐户控制”功能
- ·Google Gmail新增加邮件彩色标签功能
- ·RealPlayer 11简体中文版功能速览
- ·网络营销网站功能设计的几点心得
- ·ASP.NET 2.0功能扩展:跨页提交
- VB设计有语音报时和报警功能的闹钟 相关软件
- ·公司企业网站管理系统模板功能强大版
- ·《失落的星球》全版本多功能修改器全集
- ·图解PHOTOSHOP CS2 新功能体验
- ·Win2000网络服务功能
- ·疯狂英语突破功能
- ·疯狂英语之突破功能电子书
- ·AutoCAD 2004 新功能与升级培训教程
- ·Photoshop v7.0 新增图修功能教学
- ·QQ显IP 显隐身超级版 2款不同功能最新QQ版本 友情下载
- ·功能强大的全方位电脑测试软件 rar 几乎囊括了电脑
- 特别声明:本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载,但请务必注明出处和原始作
- 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站,我们表示深深的谢意。如果本站转
- 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源:http://www.hackhome.com
精品推荐
热点TOP10
- ·VB打造超酷个性化菜单(五)
- ·VB打造超酷个性化菜单(六)
- ·VB+Access设计图书管理系统
- ·VB6中使用Winsock穿越各种代理的实现
- ·用API修改注册表的完整模块
- ·用VB实现井字游戏
- ·VB打造超酷个性化菜单(2)
- ·VB打造超酷个性化菜单(3)
- ·VB中使用EXCEL输出
- ·webbrowser 技巧2 (收藏)
- ·VB设计有语音报时和报警功能的闹钟
- ·WINDOWS消息说明
- ·VB表格控件总览与例程分析
- ·Visual Basic创建“五星”级控件
- ·利用WebBorwser和MSHTML.tlb做广告过滤器完全源码公开
- ·VB消息相关
- ·基于VB的流媒体解码与播放技术
- ·用VB实现一个简单的ESMTP客户端
- ·如何用VB获得机器的MAC地址
- ·VB网络编程中Winsock的使用
特别推荐
- ·VB6中使用Winsock穿越各种代理的实现
- ·VB打造超酷个性化菜单(六)
- ·VB表格控件总览与例程分析
- ·用VB6.0制作画图板
- ·MSHFlexGrid 控件的应用
- ·Visual Basic 控件简介
- ·利用硬盘序列号计算软件注册码
- ·计算机等级考试二级VB常用算法:排序
- ·用diskid.dll和disk32.dll获得硬盘序列号
- ·在VFP、VB应用程序中激活鼠标功能
- ·vb基础(打印问题)
- ·想用就用,VB基础代码
- ·运用多媒体WAV文件格式二三例
- ·VB基础学习:编码规范
- ·VB实现程序的隐形
- ·使用.NET Framework从VB6中访问事件日志
- ·怎样把VC++代码转换成VB代码
- ·如何用VB程序来播放WAV文件
- ·VB 实用函数集
- ·用VB制作RM压缩软件
