- 浏览: 1544059 次
- 性别:
- 来自: 上海
文章分类
- 全部博客 (532)
- 软件设计师 (7)
- PSP (5)
- NET MD (9)
- Hibernate (8)
- DIY (51)
- Work (43)
- GAME (24)
- 未分类 (44)
- iPod (6)
- MySQL (39)
- JSP (7)
- 日语能力考试 (36)
- 小说 (4)
- 豆包网 (23)
- 家用电脑 (7)
- DB2 (36)
- C/C++ (18)
- baby (9)
- Linux (13)
- thinkpad (23)
- OA (1)
- UML (6)
- oracle (24)
- 系统集成 (27)
- 脑梗塞 (6)
- 车 (8)
- MainFrame (8)
- Windows 7 (13)
- 手机 (8)
- git (12)
- AHK (2)
- COBOL (2)
- Java (9)
最新评论
-
安静听歌:
... ...
UUID做主键,好还是不好?这是个问题。 -
lehehe:
http://www.haoservice.com/docs/ ...
天气预报 -
lehehe:
[url http://www.haoservice.com/ ...
天气预报 -
liubang201010:
监控TUXEDO 的软件推荐用这个,专业,权威.并能提供报警和 ...
(转载)Tuxedo中间件简介 -
tinkame:
Next[j] =-1 当j=0时;=Max{k|0<k ...
KMP字符串模式匹配详解
编程中常常会与时间打交道,VB编程自然也不例外。以下就谈谈我在这方面的一点经验。
VB中提供了很多变量类型,DATE型就是专门用了存储时间的。
1、DATE型变量及其相关函数。
在内部,一个Date占8个字节的内存,你可以方便地用它来存储日期和时间。给Date变量赋值是很容易的。但请保证输入顺序与系统默认的时间表示顺序相同。例如:
Dim d As Date
d = #5/23/99 11:45:34 AM#
DateSerial函数可以把年、月、日的数字组合成一个Date值。TimeSerial函数可把小时、分、秒的数字组合成一个Date值。且两函数可以叠加。
d = DateSerial(1999, 5, 23) + TimeSerial(11, 45, 34)
而DateValue 和TimeValue 函数则可将代表日期和时间的字符串转化为Date型,并且也可以叠加。
d = DateValue(“1999/ 5/ 23”) + TimeValue(“11: 45: 34”)
Format函数可按预定的格式显示或打印一个Date变量。如:
Print Format(d, “general date”) `99-5-23 11:45:34
Print Format(d, “long date”) `1999年5月23日
Print Format(d, “medium date”) `99-05-23
Print Format(d, “short date”) `99-5-23
Print Format(d, “long time”) `11:45:34
Print Format(d, “medium time”) `11:45 AM
Print Format(d,“short time”) `11:45
Format函数也允许你自己规定显示格式。如:
Print Format(d, “mmmm”) `may 产生日期中月份的英文
以以上日期为例,如想显示其中的一部分信息可使用以下函数:
Print Month(d) `5
Print Day(d) `23
Print Year(d) `1999
Print Hour(d) `11
Print Minute(d) `45
Print Second(d) `34
Print WeekDay(d)`1
Weekday 提供了一组内部常量,vbSunday代表1,直到 vbSaturday代表7。
Now 函数可返回今天的日期及时间。如:
Private Sub Form_Click()
Dim d As Date
d = Now
Print d
End Sub
灵活地应用以上的函数,可以大大地简化你的程序。例如想计算10000秒等于几小时几分几秒可写为:
Private Sub Form_Click()
Dim d As Date
d = TimeSerial(0, 0, 10000)
Print d
End Sub
结果为2:46:40。
2、与时间相关的常用控件。
Timer控件是一个奇特的控件。Timer 控件会在固定时间间隔中运行Timer事件。此间隔是由Interval属性决定的,其单位为千分之一秒。但不要以为将其值设为0事件就可不间断地运行了。结果恰恰相反,事件将一次也不运行。同时还要注意变量的声明。如:
Private Sub Timer1_Timer()
Dim a As Integer
a = a + 1
Print a
End Sub
Dim a As Integer
Private Sub Timer1_Timer()
a = a + 1
Print a
End Sub
试试看,其结果是完全不同的。
当需要用户输入时间时,为避免出现错误的时间,可以使用日历控件。它只允许用户在日历表中选择日期,避免了错误的发生。
3、记录时间的API函数。
GetTickCount Windows API函数可返回 Windows 启动以来消失的毫秒数。其精度高于VB的Timer 函数。且Timer 函数会在午夜清零,而GetTickCount 函数只有当机器连续使用49.7天后才返回零。这为我们编程提供了很大的方便。例如想知道你的电脑连续工作多久了,可新建一工程,然后添加以下代码:
Private Declare Function GetTickCount Lib “kernel32" () As Long
Private Sub Form_Load()
Dim d As Date
Dim t As Integer
Form1.Show
t = GetTickCount \ 1000
d = TimeSerial(0, 0, t)
Print d
End Sub
发表评论
-
(转)iPod classic 技术规格
2011-05-28 23:52 1105 -
(转)你所不知道的音频一分二转接口用途
2011-05-15 21:17 2697http://wenjiang2312.blo ... -
(转)Character Sets
2011-02-12 11:26 1037http://a4esl.org/c/charset.h ... -
(转)LinuxでWindowsのフォントを使用する
2011-02-12 11:25 1004http://www.nurs.or.jp/~sugi/ ... -
(转)DVD转换RMVB格式的方法
2010-12-31 00:21 1596http://zhidao.baidu.com/ques ... -
(转)谨慎对待邮件中的附件和网页链接
2010-11-09 22:38 1451http://lihlii.posterous.com ... -
(转)医学界的一个惊天阴谋—近视手术
2010-09-27 12:54 1160http://woshao.com/article/6d1b7 ... -
MCAFEE杀毒软件无法完全卸载的解决方案
2010-04-22 09:25 1717http://think.lenovo.com.cn/ ... -
(转)SQL Server 與 Oracle 的各種版本功能、特性比較表
2010-03-29 17:01 1767http://blog.miniasp.com/post/ ... -
temp
2010-03-15 13:58 0笔记本的话看了一下,轻薄和高性能就是一对矛 ... -
(转)推荐几个常用的RapidShare搜索引擎
2010-03-08 17:23 174515 原文链接http://www.porta ... -
(转)Android来电通-AndroidCall 1.0
2010-03-04 16:09 0Android来电通-AndroidCall 1.0 作 ... -
(转)艾宾浩斯遗忘曲线——记忆与复习
2010-03-03 16:36 2310http://www.ebook99.com/blog ... -
(转)艾宾浩斯遗忘曲线复习计划表
2010-03-03 16:34 3256http://bbs.jiyifa.cn/read.ph ... -
dropbox invite
2010-02-05 17:08 0https://www.dropbox.com/referra ... -
(转)魔兽世界里所有钥匙的搜集或制作方法
2010-01-05 21:59 1387http://zhidao.baidu. ... -
如何分辨下載來的影片格式資訊
2009-12-12 12:03 863补课:如何分辨下載來的影片格式資訊1).CAM是用數碼攝 ... -
卡普家居 只与经典有染淘宝胡公子胡为
2009-11-12 12:44 834http://rate.taobao.com/user ... -
【淘色新闻】淘宝最牛掌柜,骂人骂出几万信用
2009-11-12 09:39 2580http://bangpai.taobao.com/group ... -
男性结扎十年性能力会丧失?
2009-09-04 00:56 0男性结扎十年性能力 ...
相关推荐
本文将详细介绍VB中用于转换变量类型的常用函数,包括它们的功能、适用范围及注意事项。 #### CBool:转换为布尔型 - **功能**:将表达式转换为布尔型(`Boolean`)。 - **适用范围**:适用于所有可以被解释为逻辑...
Date 函数返回当前系统日期,DateAdd 函数返回加上了指定的时间间隔的日期,DateDiff 函数返回两个日期之间的间隔,DatePart 函数返回给定日期的指定部分,DateSerial 函数返回指定年月日的日期子类型的变体,Date...
VB语言参考及函数速查手册CHM是一个非常实用的资源,旨在为VB编程者提供详尽的语法解释、函数用法以及编程技巧。 该手册的核心内容可能包括以下几个方面: 1. **VB基本语法**:涵盖变量声明、数据类型(如Integer,...
- **内置函数**:VB提供了大量的内置函数,如Math函数用于数学运算,Date函数获取当前日期,String函数创建字符串等。 - **自定义函数**:程序员可以根据需求创建自己的函数,通过Function关键字定义,返回特定值...
本速查手册旨在为VB程序员提供详尽的语法参考和函数用法,帮助他们快速解决编程中遇到的问题。 在VB语言中,基础语法包括变量声明、数据类型(如Integer、String、Boolean等)、流程控制语句(If...Then...Else、...
本资源“VB6.0函数使用方法和说明--中文版”是一份详尽的VB6.0函数参考手册,适合初学者和进阶者学习和查阅。 在VB6.0中,函数是程序中的重要组成部分,它们执行特定任务并可能返回一个值。函数分为内置函数和...
### VB6 函数表知识点详解 #### Abs 函数 **功能**:返回数值的绝对值。 **示例**: ```vb Dim MyNumber MyNumber = Abs(-50) ' 返回 50。 ``` #### And 运算符 **功能**:执行逻辑 AND 运算,将两个布尔表达式...
在VB(Visual Basic)编程语言中,函数是执行特定任务的预定义代码块,它们能够接收参数,并返回一个结果。以下是一些VB中常用的函数及其功能的详细解释: 1. **Abs函数**:该函数返回一个数值的绝对值,无论这个...
在VB6中,变量用于存储数据,你需要先声明其类型,例如Integer(整型)、Double(双精度浮点型)、String(字符串型)等。例如: ```vb Dim myNumber As Integer myNumber = 123 ``` 二、常量 常量是不可更改的值,...
本文将详细介绍VB中的日期函数及其用法,并通过具体示例帮助读者更好地理解和应用这些函数。 #### 1. Year、Month、Day函数 - **Year(X)**:返回日期 `X` 的年份部分。 - **Month(X)**:返回日期 `X` 的月份部分。 ...
### VB常用函数详解 #### 一、类型转换函数 在Visual Basic编程中,类型转换函数是非常重要的工具,用于确保变量或表达式的类型符合预期。以下是一些常用的类型转换函数: - **CBool**:该函数将任何表达式转换为...
在VB(Visual Basic)编程语言中,类型字符是一种声明变量时指定数据类型的方式,它可以精简代码并提高可读性。类型字符是一个单字符符号,它紧跟在变量、常量或函数名之后,用于明确其数据类型。这些字符不是变量名...
为了更好地掌握VB函数,建议开发者不仅要了解每个函数的基本用法,还要通过实践来熟悉它们在不同场景下的应用。同时,查阅相关的在线资源,如codefans.net等网站,可以获取更详尽的函数介绍和示例代码,进一步提升...
本篇将详细介绍VB的一些常用基本函数库,帮助你更好地理解和应用这些功能。 1. **字符串处理函数** - `Len()`:返回字符串的长度,不包括结束的空字符。 - `Mid()`:从字符串中提取指定长度的子串。 - `Left()`...
《VB函数参考手册》是一本全面介绍Visual Basic (VB)编程语言中函数使用的电子书籍,对于初学者和有一定经验的开发者来说,都是宝贵的参考资料。VB是Microsoft开发的一种面向对象的编程语言,它以其简单易学、功能...
- **功能**:分别将变量转换为整型、字符串、长整型、布尔型和日期型。 - **用法**: - `CInt(数值表达式)`,如 `CInt(3.9)` 返回 4; - `CStr(数值表达式)`,如 `CStr(123)` 返回 "123"; - `CLng(数值表达式)`...
3. **变量与数据类型**:VB6支持多种数据类型,如Integer、Double、String、Date等,开发者需根据实际需求声明和使用变量。 4. **对象和控件**:VB6是面向对象的编程环境,提供了丰富的控件库,如Button、Label、...
《VB编程辞典》收录了VB内置的各类函数,包括数学函数(如Sqr、Rnd)、字符串处理函数(如Mid、InStr)、日期/时间函数(如Date、Now)以及I/O操作函数(如Open、Close)等。通过这个辞典,开发者可以迅速找到所需...
4. 函数和过程:VB中的Function用于定义计算型函数,可以返回一个值;Sub过程则用于封装一组操作,不返回值。它们都可以接受参数,并通过Call语句或直接调用来执行。 5. 集合与数组:VB提供了Array和ArrayList等...