vbscript函数(vbscript代码)
若产生输入框可以用vbscript的什么函数
vbscript输入框可以用InputBox函数。
1、InputBox介绍:
InputBox是Visual Basic和VBS中的函数,功能是弹出一个对话框,在其中显示提示,等待用户输入文字并按下按钮,然后返回用户输入的文字。
2、InputBox使用语法:
InputBox(Prompt,[Title],[Default],[XPos],[YPos],[Helpfile],[Context])
3、代码示例:(显示效果如下图)
Private Sub Command1_Click()
Dim a As String, b As String
a = InputBox("输入第一个数据:")
b = InputBox("输入第二个数据:")
MsgBox a b
End Sub
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,这样小弟才好判断是否要允许。
JavaScript 函数如何调用 VBScript 函数
直接调用!JavaScript 可以调用 VBScript 内的函数和变量,VBScript 也可以调用 JavaScript内的函数和变量。
所要说明的是,这里指的函数和变量均指自定义函数和变量,而不是该语言自带的函数和变量,要调用自带函数或变量应该先用自定义函数或变量将其包装起来。并且这种调用只在 IE 浏览器里有效。
比如:JavaScript 里没有 IsDate 这个函数,VBScript 里有,要在 JavaScript 里使用这个函数,就得写一个 VBScript 脚本,内容可以是:
function IsDate_VBS(dt)
IsDate_VBS = IsDate(dt)
end function
在 JavaScript 里面,再直接使用 IsDate_VBS 函数就可以了。
另外,同样要说明的是,跟只用一门语言相同,函数或变量应该先定义再使用,即定义体应该位于调用之前。
通过互相调用可以使两门语言达到优势互补。
在某些浏览器中可能不支持 VBScript。
如何使用VBScript脚本语言编写一个函数
Mid 函数可从字符串中返回指定数目的字符。
语法:Mid(string,start[,length])
string 必需的。从其中返回字符的字符串表达式。如果字符串包含 Null,则返回 Null。
start 必需的。规定起始位置。如果设置为大于字符串中的字符数目,则返回空字符串("")。
length 可选的。要返回的字符数目。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从 start 到字符串结束的所有字符。
例子
dim txt
txt="abcde"
document.write(Mid(txt,2,3))
输出:
bcd
数的用法是错误的。WEEKDAY函数函数名称:
vbscript函数中的函数返回值是什么意思
例如你定义一个变量a,再定义一个函数fun1(),如果你需要用到fun1()的返回值的时候,就是说当你写a=fun1()的时候,fun1()的返回值就赋给了a。所以一般在vbscript的函数需要返回的时候,在函数的最后就要写上fun1=xyz此类语句,这时a就赋值为xyz了。