vbscript函数（总结vbscript中，过程以函数的格式及调用方法，总结二者区别）

本文目录

• 总结vbscript中，过程以函数的格式及调用方法，总结二者区别
• 用VBScript编个函数
• vbscript 函数定义关键字是什么
• JavaScript 函数如何调用 VBScript 函数
• asp函数的VBScript常用函数
• VBSCRIPT的函数问题高手进!!
• vbscript函数中的函数返回值是什么意思

总结vbscript中，过程以函数的格式及调用方法，总结二者区别

主要有两种:function和subfunction:称作函数可以有返回值也可以没有返回值’’’’’’’’’’’’’’’’’’’’’例：有返回值的’’’’’’’’’’’’’’’’’’’’’functionX()X=5endfunction调用返回值的XYdimxx=X()’’’’’’’’’’’’’’’’’’’’’没有返回值的’’’’’’’’’’’’’’’’’’’’’functionY()response.write("没有返回值")endfunction’’’’’’’’’’’’’’’’’’’’’’’调用：Y()’’’’’’’’’’’’’’’’’’’’’’’’’’sub和function为一的区别就是sub不能有返回值，其用法和function的没有返回值的用法一样。

用VBScript编个函数

用这段把，动易公司开发的系统都是用搞的这个，只不是函数名称不同，但是觉得功能一样！’**************************************************’函数名：gotTopic’作 用：截字符串，汉字一个算两个字符，英文算一个字符’参 数：str ----原字符串’ strlen ----截取长度’返回值：截取后的字符串’**************************************************function gotTopic(str,strlen) if str="" then gotTopic="" exit function end if dim l,t,c, i str=replace(replace(replace(replace(str," "," "),""",chr(34)),"》","》"),"《","《") l=len(str) t=0 for i=1 to l c=Abs(Asc(Mid(str,i,1))) if c》255 then t=t+2 else t=t+1 end if if t》=strlen then gotTopic=left(str,i) & "…" exit for else gotTopic=str end if next gotTopic=replace(replace(replace(replace(gotTopic," "," "),chr(34),"""),"》","》"),"《","《")end function

vbscript 函数定义关键字是什么

用 Dim 声明-----------------VBScript 变量什么是变量？变量是一种使用方便的占位符，用于引用计算机内存地址，该地址可以存储 Script 运行时可更改的程序信息。例如，可以创建一个名为 ClickCount 的变量来存储用户单击 Web 页面上某个对象的次数。使用变量并不需要了解变量在计算机内存中的地址，只要通过变量名引用变量就可以查看或更改变量的值。在 VBScript 中只有一个基本数据类型，即 Variant，因此所有变量的数据类型都是 Variant。 声明变量声明变量的一种方式是使用 Dim 语句、Public 语句和 Private 语句在 VBScript 中显式声明变量。例如： Dim DegreesFahrenheit声明多个变量时，使用逗号分隔变量。例如： Dim Top, Bottom, Left, Right另一种方式是通过直接在 Script 中使用变量名这一简单方式隐式声明变量。这通常不是一个好习惯，因为这样有时会由于变量名被拼错而导致在运行 Script 时出现意外的结果。因此，最好使用 Option Explicit 语句显式声明所有变量，并将其作为 Script 的第一条语句。

JavaScript 函数如何调用 VBScript 函数

直接调用！JavaScript 可以调用 VBScript 内的函数和变量，VBScript 也可以调用 JavaScript内的函数和变量。所要说明的是，这里指的函数和变量均指自定义函数和变量，而不是该语言自带的函数和变量，要调用自带函数或变量应该先用自定义函数或变量将其包装起来。并且这种调用只在 IE 浏览器里有效。比如：JavaScript 里没有 IsDate 这个函数，VBScript 里有，要在 JavaScript 里使用这个函数，就得写一个 VBScript 脚本，内容可以是：function IsDate_VBS(dt)IsDate_VBS = IsDate(dt)在JavaScript 里面，再直接使用 IsDate_VBS 函数就可以了。另外，同样要说明的是，跟只用一门语言相同，函数或变量应该先定义再使用，即定义体应该位于调用之前。通过互相调用可以使两门语言达到优势互补。

asp函数的VBScript常用函数

函数返回一个包含数组的Variant。下标由0开始。语法：Array(arglist)arglist 参数是以逗号分隔的Variant，可以是字符串，数值，日期等类型《%Dim arrn, arrsarrn = Array(1,2,3)arrs = Array(A,B,C)Response.Write arrn(1) ‘ 输出结果：2Response.Write arrs(2) ’ 输出结果：C%》 函数将一个表达式转化为数字类型表达式 CInt(expression)允许数据类型： 任何有效的字符均可实例：《%f = 234response.write cINT(f) + 2%》返回结果： 236转化字符234为数字234，如果字符串为空，则返回0值 函数建立和返回一个已注册的ACTIVEX组件的实例。表达式 CreateObject(objName)允许数据类型： objName 是任何一个有效、已注册的ACTIVEX组件的名字.实例：《%Set con = Server.CreateObject(ADODB.Connection)%》 函数转化一个表达式为字符串.表达式 CStr(expression)允许数据类型： expression 是任何有效的表达式。实例：《%s = 3 + 2response.write The 返回结果 is: & cStr(s)%》转双精度型函数　　Cdbl（数值表达式） 把数值表达式值转换为双精度型。　　转单精度型函数　　Csng（数值表达式） 把数值表达式值转换为单精度型。　　转日期型函数　　Cdate（表达式） 把表达式值转换为日期型。 　　转变体型函数　　Cvar（表达式） 把表达式值转换为变体型。 函数返回当前系统日期.表达式 Date()允许数据类型： None.实例：《%=Date%》返回结果： 9/9/00 函数返回一个被改变了的日期。表达式 DateAdd(timeinterval,number,date)允许数据类型：timeinterval is the time interval to add;number is amount of time intervals to add;and date is the starting date.实例：《%currentDate = #9/9/00#newDate = DateAdd(m,3,currentDate)response.write newDate%》《%currentDate = #12:34:45 PM#newDate = DateAdd(h,3,currentDate)response.write newDate%》返回结果： 9/9/003:34:45 PMm = month;d = day;If currentDate is in time format then,h = hour;s = second; 函数返回两个日期之间的差值。表达式 DateDiff(timeinterval,date1,date2 )允许数据类型： timeinterval 表示相隔时间的类型，如“M“表示“月”。实例：《%fromDate = #9/9/00#toDate = #1/1/2000#response.write There are & _DateDiff(d,fromDate,toDate) & _ days to millenium from 9/9/00.%》返回结果： 从9/9/00 到2000年还有 150 天. 函数返回一个月的第几日 .表达式 Day(date)允许数据类型： date 是任何有效的日期。实例：《%=Day(#9/9/00#)%》返回结果： 4 函数返回表达式，此表达式已被格式化为货币值表达式 formatCurrency(Expression )允许数据类型： Digit 指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是计算机的区域设置； LeadingDigit 三态常数，指示是否显示小数值小数点前面的零。实例：《%=formatCurrency（34.3456）%》返回结果： $34.35 函数返回表达式，此表达式已被格式化为日期或时间表达式 formatDateTime(Date,)允许数据类型： Namedformat 指示所使用的日期/时间格式的数值，如果省略，则使用 vbGeneralDate.实例：《%=formatDateTime(09/9/00,vbLongDate)%》返回结果： Sunday,September 09,2000 函数返回表达式，此表达式已被格式化为数值.表达式 formatNumber(Expression )允许数据类型： Digit 指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是计算机的区域设置。； LeadingDigit i指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是计算机的区域设置。； Paren 指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是计算机的区域设置。； GroupDigit i指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是计算机的区域设置..实例：《%=formatNumber（45.324567,3）%》返回结果： 45.325 函数返回表达式，此表达式已被格式化为尾随有 % 符号的百分比（乘以 100 ）。（%)表达式 formatPercent(Expression )允许数据类型： 同上.实例：《%=formatPercent(0.45267,3）%》返回结果： 45.267% 函数以24时返回小时数.表达式 Hour(time)允许数据类型：实例：《%=Hour(#4:45:34 PM#)%》返回结果： 16（Hour has been converted to 24-hour system) 函数返回字符或字符串在另一个字符串中第一次出现的位置.表达式 Instr()允许数据类型： Start为搜索的起始值，strToBeSearched接受搜索的字符串 strSearchFor要搜索的字符.compare比较方式（详细见ASP常数）实例：《%strText = This is a test!!pos = Instr(strText,a)response.write pos%》返回结果： 9 InstrRev()函数同上，只是从字符串的最后一个搜索起表达式InstrRev()允许数据类型： 同上.实例：《%strText = This is a test!!pos = InstrRev(strText,s)response.write pos%》返回结果： 13 函数返回数值类型，不四舍五入。表达式 Int(number)允许数据类型：实例：《%=INT（32.89）%》返回结果： 32 IsArray()函数判断一对象是否为数组，返回布尔值 .表达式IsArray(name)实例：《%strTest = Test!response.write IsArray(strTest)%》返回结果： False 函数判断一对象是否为日期，返回布尔值表达式 IsDate(expression)实例：《%strTest = 9/4/2000response.write IsDate(strTest)%》返回结果： True 函数判断一对象是否初始化，返回布尔值.表达式 IsEmpty(expression)实例：《%Dim iresponse.write IsEmpty(i)%》返回结果： True 函数判断一对象是否为空，返回布尔值.表达式 IsNull(expression)实例：《%Dim iresponse.write IsNull(i)%》返回结果： False 函数判断一对象是否为数字，返回布尔值.表达式 IsNumeric(expression)实例：《%i = 345response.write IsNumeric(i)%》返回结果： True就算数字加了引号，ASP还是认为它是数字。 IsObject()函数判断一对象是否为对象，返回布尔值.表达式 IsObject(expression)实例：《%Set con = Server.CreateObject(ADODB.Connection)response.write IsObject(con)%》返回结果： True 函数返回指定数组维的最小可用下标.表达式 Lbound(arrayname )实例：《%i = Array(Monday,Tuesday,Wednesday)response.write LBound(i)%》返回结果： 0 函数 返回字符串的小写形式表达式 Lcase(string)实例：《%strTest = This is a test!response.write LCase(strTest)%》返回结果： this is a test! 函数返回字符串左边第length个字符以前的字符（含第length个字符）.表达式 Left(string,length)实例：《%strTest = This is a test!response.write Left(strTest,3）%》返回结果： Thi 函数返回字符串的长度.表达式 Len(string | varName)实例：《%strTest = This is a test!response.write Len(strTest)%》返回结果： 15 函数去掉字符串左边的空格.表达式 LTrim(string)实例：《%strTest = This is a test!response.write LTrim(strTest)%》返回结果： This is a test! 函数返回特定长度的字符串（从start开始，长度为length).表达式 Mid(string,start )实例：《%strTest = This is a test! Today is Monday.response.write Mid(strTest,17,5）%》返回结果： Today 函数返回时间的分钟.表达式 Minute(time)实例：《%=Minute(#12:45:32 PM#)%》返回结果： 45 函数返回日期.表达式 Month(date)实例：《%=Month(#08/04/99#)%》返回结果： 8MonthName()函数返回指定月份表达式 MonthName(month,)实例：《%=MonthName(Month(#08/04/99#))%》返回结果： August 函数返回系统时间表达式 Now()实例：《%=Now%》返回结果： 9/9/00 9:30:16 AM 函数返回字符串右边第length个字符以前的字符（含第length个字符）.表达式 Right(string,length)实例：《%strTest = This is an test!response.write Right(strTest,3）%》返回结果： st! 函数产生一个随机数.表达式 Rnd 实例：《%Randomize()response.write RND()%》返回结果： 任何一个在0 到 1 之间的数 函数返回按指定位数进行四舍五入的数值.表达式 Round(expression )实例：《%i = 32.45678response.write Round(i)%》返回结果： 32 函数去掉字符串右边的空格.表达式 Rtrim(string)实例：《%strTest = This is a test!! response.write RTrim(strTest)%》返回结果： This is a test!! 函数将一个字符串分割并返回分割结果表达式 Split (S)实例：《%V= Split(A,B,C)For i = 0 To UBound(V)Response.Write V(i)Next%》返回结果： A B C 函数返回秒.表达式 Second(time)实例：《%=Second(#12:34:28 PM#)%》返回结果： 28 函数反排一字符串表达式StrReverse(string)实例：《%strTest = This is a test!!response.write StrReverse(strTest)%》返回结果： !!tset a si sihT 函数返回系统时间.表达式 Time()实例：《%=Time%》返回结果： 9:58:28 AM 函数去掉字符串左右的空格.表达式 Trim(string)实例：《%strTest = This is a test!! response.write Trim(strTest)%》返回结果： This is a test!! 函数返回指定数组维数的最大可用下标》.表达式Ubound(arrayname )实例：《%i = Array(Monday,Tuesday,Wednesday)response.write UBound(i)%》返回结果： 2 函数返回字符串的大写形式.表达式 UCase(string)允许数据类型：实例：《%strTest = This is a test!!response.write UCase(strTest)%》返回结果： THIS IS A TEST!! 函数返回指示变量子类型的值表达式 VarType(varName)实例：《%i = 3response.write varType(i)%》返回结果： 2（数字）详见asp常数 函数返回在一周的第几天.表达式 WeekDay(date )实例：《%d = #9/9/00#response.write Weekday(d)%》返回结果： 4（星期三） 函数返回一周第几天的名字.表达式WeekDayName(weekday )实例：《%d = #9/9/00#response.write WeekdayName(Weekday(d))%》返回结果： Wednesday 函数返回当前的年份.表达式 Year(date)实例：《%=Year(#9/9/00#)%》返回结果： 1999

VBSCRIPT的函数问题高手进!!

先说说GetContent=Right(str,Len(str)-Instr(lcase(str),lcase(start))-Len(start)+1) 这一句是指：从str字符串变量中找到和start字符串变量中的字母相同的字符串（忽略大小写），然后取出其后所有字母。举例如下： 设str中的字符串为"abcDefgHijKlmn",start字符串为"G",其中大小写混杂，那么该函数会先将str和start中所有大写的字母转换为小写（ lcase(start)和lcase(str)来实现)，这是用来忽略大小写的。len(start)为取得start的长度为1，len(str)为取得str的长度为14，然后用instr()函数实现从str中搜索start出现的位置，这里为7，即Instr(lcase(str),lcase(start)）＝7。 然后用7减去start的长度，再加上1，仍等于7，作为取字符串右边部分的函数right的两个参数的第二个参数。这里说明一下Right(s1,s2)，该函数有两个参数，第一个为源字符串，此处为str，即"abcDefgHijKlmn"；第二个参数为从右数起第几个字母开始取，是一个整数，此处为7。 由此可得出结果，将从"abcDefgHijKlmn"中取出右七个字母，结果为"HijKlmn"，即字母"g"之后的所有字母。以上为start中是单字母的情况，因为该程序同时设置了start和last（从意义上理解该是指要取出的字符串的开始和结尾），故两者该均只存在一个字母。此外在该自定义函数中，如果在str中找不到完全符合start的字符串，那么返回0,执行GetContent=""——由If Instr(lcase(str),lcase(start))》0来判断实现。下面对整个函数体作个小分析：1：定义一个四个参数的函数，四个参数涵义如下：str,源字符串；start,要搜索的字符串；last，2：判断str中是否能找到和start中的字母相同的字符，如果有，执行下面语句，否则结束。3： 使用select来多分支。4~11：主体程序，用以给出取字符串的具体规则。这里需要指出，当n=0时和n=1时，区别只在于是否取出的字符串中包含start和last中的字母；n=2时，就是你问的这句——取时不包括start中的字母，last没有用到，当然不用管它。剩下的：结束。另：如果还有疑问，可以加我QQ：85457284，以作交流。请求时请注明是：VBscript，这样小弟才好判断是否要允许。

vbscript函数中的函数返回值是什么意思

例如你定义一个变量a，再定义一个函数fun1()，如果你需要用到fun1()的返回值的时候，就是说当你写a=fun1()的时候，fun1()的返回值就赋给了a。所以一般在vbscript的函数需要返回的时候，在函数的最后就要写上fun1=xyz此类语句，这时a就赋值为xyz了。