VBS的字符串及日期相关函数

本文详细介绍了VBS中处理字符串和日期的各种函数,包括转换、搜索、连接、分割等操作,以及日期的获取、格式化和计算方法,适合初学者和开发者快速掌握VBS的日期与字符串操作。
VBS的字符串及日期相关函数


      最近写asp程序时用到日期格式转换,因为不同数据库对日期格式要求不一样,这里特别找了一些相关资料,希望对大家有所帮助,如有问题请留言,谢谢!
1. Asc(x),Chr(x):转换字符,字符码

2. Filter:搜寻字符串数组中的特定字符串

格式:v=filter(x,s[,include[,compare]])

实例:

Dim x()={"kjwang","wangkj","peter"}

Dim v

v=filter(x,"kj") '结果v(0)="kjwang",v(1)="wangkj"

v=filter(x,"kj",false) '结果v(0)="peter"

v=filter(x,"kj",true,vbTextCompare) '不分大小写搜寻 

3. InStr:寻找字符串位置(InstrRev:倒过来寻找字符串)

格式:

v=instr(x,y) '从x字符串第1个字符起找出y字符串出现的位置

v=instr(n,x,y) '从x字符串第n个字符起找出y字符串出现的位置

格式:

v=InstrRev(x,s[,n[,Compare]])

4. Join:将字符串连接

格式:v=join(x[,d])’d为分隔字符

5. Len(x):计算字符串x的长度

格式:v=len(x)

6. Left(x,n):返回字符串x左边n个字符(对应Right(x,n))

7. Mid:读取字符串x中间的字符

格式:v=mid(x,n,m)

8. LTrim(x),RTim(x),Trim(x)去空白字符

9. Replace:字符串取代

格式:v=Replace(x,s,r)

实例:x="i saw a saw a saw"

v=replace(x,"saw","so") 'v="i so a so a so"

10. Split:字符串分割

格式:v=split(s[,d])

实例:v=split("vb.net,iis6.0,asp.net",",")

'结果v(0)="vb.net",v(1)="iis6.0",v(2)="asp.net"

11. StrReverse:反转字符串

实例:v=strreverse("kjwang") 'v="gnawjk"

12. UCase(x),LCase(x):变换英文字母的大小写

实例:x="hello,VB中文!"

v=UCase(x) 'v="HELLO,VB中文!" 

'日期相关

1. 取出日期时间

1)DateValue(x),TimeValue(x)
格式:v=DateValue(x) :取出的“日期”部分
   v=timevalue(x) '类上

2)Year(x),Month(x),Day(x)
格式:v=Year(x)
   v=Month(x)
   v=Day(x)
   Hour(x),Minute(x),Second(x):取出时,分,秒

3)DateSerial(Y,M,D):合并年、月、日成为日期

实例:Dim v
v=DateSerial(1996,10,5) 'v=1996/10/5
 TimeSerial(H,M,S):合并时、分、秒成为时间

2. Now:读取系统日期时间

格式:v=now

3. Timer:从凌晨12:00:00AM起所经过的秒数

格式:v=timer

4. DatePart(p,x):取出年、月、日等各部分的数值

实例:Dim X=#2/10/1996 16:45:30#

v=DatePart("yyyy",X) 'v=1996年

v=DatePart("m",X) 'v=2月

v=DatePart("d",X) 'v=10日

v=DatePart("h",X) 'v=16时

v=DatePart("n",X) 'v=45分

v=DatePart("s",X) 'v=30秒

v=DatePart("q",X) 'v=1季(第一季,春季)

v=DatePart("y",X) 'v=41天(1996年的第41天)

v=DatePart("ww",X) 'v=6周(1996年的第6周)

v=DatePart("w",X) 'v=7(第6周的第7天,即星期六)

5. DateAdd(p,n,x):加减若干时间后的新日期时间

格式:v=DateAdd(p,n,x) 'p值同上如:"yyyy"、"m"等

实例:Dim x=#1/31/1996 16:45:30#

v=dateadd("yyyy",-3,x) '减3年,v=1993/1/31 16:45:30

6. DateDiff(p,x1,x2):计算两日期时间的差值 'p值同上

实例:dim x1=#12/31/1996 16:45:30#

x2=#2/10/1997 9:30:50#

v=datediff("yyyy",x1,x2) 'v=1年 

7. FormatDateTime:日期时间的格式化

格式:v=formatdateyime(x[,日期格式])

日期格式值:DateFormat.GeneralDate 、 DateFormat.LongDate、

DateFotmat.ShortDate、DateFormat.LongTime、DateFormat.ShortTime

8. MonthName:返回月份名称

实例:v=monthname(5) 'v="五月"

9. WeekDayName:返回星期名称 ’用法同8.

 

关键字: vbs,日期格式,字符串

转载于:https://www.cnblogs.com/JoinZhang/archive/2010/08/06/1793855.html

<think>好的,我现在需要帮助用户解决在VBScript中获取字符串长度的问题。首先,用户明确提到他们想查找用于判断字符串长度的VBScript函数,所以我的首要任务是确认正确的函数名称和使用方法。 我记得VBScript中有几个常用的字符串函数,比如Len、Left、Right、Mid等。根据用户的问题,他们需要的是获取字符串长度,所以应该想到Len函数。不过我得再确认一下,避免记错。比如,有些语言可能用length()或者size(),但VBScript确实是Len。这时候需要确保信息的准确性,避免误导用户。 接下来,我需要验证这个函数的具体用法。例如,Len函数是否直接接受字符串作为参数?是否处理空字符串或Null值?根据引用内容中的例子,比如引用[1]提到StrReverse函数处理空字符串和Null的情况,Len函数可能也有类似的行为。如果用户传递Null给Len函数,是否会导致错误?应该指出这一点,提醒用户注意。 然后,用户可能的需求不仅仅是知道函数名称,还需要示例代码来理解如何使用。所以,我应该提供一个简单的例子,比如使用Len(str)来返回字符串长度。同时,考虑不同情况,比如空字符串、包含空格的字符串,以及包含中文字符的情况,说明Len函数在这些情况下的表现是否一致。 另外,用户可能在实际使用中遇到问题,比如如何处理包含特殊字符或Unicode字符的字符串长度。VBScript中的Len函数返回的是字符数,而不是字节数,这点需要明确说明,避免混淆。比如,中文字符虽然占多个字节,但在Len函数中会被视为一个字符,因此长度计算是准确的。 还有,需要检查是否有相关的引用支持。根据用户提供的引用,引用[1]和引用[2]主要提到了StrReverse和Instr函数,虽然不直接涉及Len函数,但可以推测VBScript的字符串函数通常以类似的方式处理参数。因此,在回答中需要正确引用这些信息,并在适当的位置添加引用标识,但可能Len函数的信息不在提供的引用中,所以需要依靠自己的知识库,但需要确保准确性。 此外,用户可能还会关心性能问题或使用中的常见错误。例如,如果传递的不是字符串类型,Len函数的行为是什么?比如,如果传入数字,VBScript是否会隐式转换,或者报错?这时候需要说明Len函数的参数类型要求,确保用户正确使用。 最后,生成相关问题需要考虑用户可能的后续疑问,比如如何处理中文字符长度、函数是否区分大小写、如何获取字节数而不是字符数等。这些问题可以帮助用户更全面地理解字符串处理在VBScript中的应用。</think>在VBScript中获取字符串长度的函数是$Len()$,该函数返回字符串的字符数量。使用方式为: ```vbscript Dim str str = "Hello World" MsgBox Len(str) '输出11 ``` ### 关键说明 1. **空字符串处理**:空字符串`""`会返回0 2. **Null值处理**:如果参数为Null会报错,需先用`IsNull()`判断 3. **中文字符计算**:每个汉字计为1个字符,如$Len("中国")$返回2 4. **空格计算**:空格计入字符数,$Len(" ") $返回2 ### 应用示例 ```vbscript Function ValidateLength(input) If IsNull(input) Then Exit Function If Len(input) > 20 Then MsgBox "超过长度限制" End If End Function ```
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值