测试UBB编辑器的用法 »

学习日记——VBScript基础(一)

◎Empty   未初始化的Variant。对于数值变量,值为 0;对于字符串变量,值为零长度字符串("")。
Null   不包含任何有效数据的Variant。
Boolean  包含 True 或 False。
Byte   包含 0 到 255之间的整数。
Integer  包含 -32,768 到 32,767 之间的整数。
Currency  -922,337,203,685,477.5808 到922,337,203,685,477.5807。
Long   包含 -2,147,483,648 到2,147,483,647 之间的整数。
Single  包含单精度浮点数,负数范围从-3.402823E38 到 -1.401298E-45,正数范围从 1.401298E-45 到3.402823E38。
Double  包含双精度浮点数,负数范围从-1.79769313486232E308 到 -4.94065645841247E-324,正数范围从4.94065645841247E-324 到 1.79769313486232E308。
Date(Time)  包含表示日期的数字,日期范围从公元 100年 1 月 1 日到公元 9999 年 12 月 31 日。
String  包含变长字符串,最大长度可为 20亿个字符。
Object   包含对象。
Error   包含错误号。
◎VBScript客户端代码与事件绑定的方法
 1,<script language="VBScript" FOR="控件名\" EVENT="onClick">
 2,Sub Button1_OnClick
 3,<input type="botton" name="name1"value="提交" OnClick="过程">
◎optionexplicit   强制要求变量声明
◎dim      声明变量
◎vartype()    变量类型测试,返回数字
◎msgbox()     弹出对话框
◎dimA(10)     定义数组A含有0-10之间的11个元素,注意是11个元素
◎redimA(20)    修改数组,会丢失已有数据,redimpreserve A(20) 保留原值的重定义
◎constA=10    定义常数A,值为10
◎sub……endsub    定义过程,只能调用,不能返回值
◎function……endfunction 定义函数,函数内部与函数同名的变量即作为返回值
◎inputbox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])其返回值为取得的输入值
 prompt  提示文字,字符串表达式最大1024字符,连接字符为&,其中回车chr(13),换行符chr(10),回车和换行的组合chr(13)&chr(10)
 title  标题
 default  默认值
 xpos  左边距离
 ypos  上边距离
 helpfile 字符串表达式,用来提供帮助文件
 context  数值表达式,指定帮助主题的编号
 
◎msgbox(prompt[,buttons][,title][,helpfile,context])弹出消息框
 prompt  消息框中的内容,字符串表达式,也可以使用回车符等,用&连接
 buttons  数值表达式,指定按钮的数目和类型、使用的图标样式
  英文表示    代码 效果
  vbOKOnly   0  只显示确定按钮。
  vbOKCancel   1  显示确定和取消按钮。
  vbAbortRetryIgnore 2  显示放弃、重试和忽略按钮。
  vbYesNoCancel  3  显示是、否和取消按钮。
  vbYesNo   4  显示是和否按钮。
  vbRetryCancel  5  显示重试和取消按钮。
  vbCritical   16  显示临界信息图标。
  vbQuestion   32  显示警告查询图标。
  vbExclamation  48  显示警告消息图标。
  vbInformation  64  显示信息消息图标。
  vbDefaultButton1 0  第一个按钮为默认按钮。
  vbDefaultButton2 256 第二个按钮为默认按钮。
  vbDefaultButton3 512 第三个按钮为默认按钮。
  vbDefaultButton4 768 第四个按钮为默认按钮。
  vbApplicationModal 0  应用程序模式:用户必须响应消息框才能继续在当前应用程序中工作。
  vbSystemModal  4096 系统模式:在用户响应消息框前,所有应用程序都被挂起。
  第一组值 (0 - 5)用于描述对话框中显示的按钮类型与数目;第二组值 (16, 32, 48, 64)用于描述图标的样式;第三组值 (0, 256, 512)用于确定默认按钮;而第四组值 (0, 4096)则决定消息框的样式。在将这些数字相加以生成 buttons参数值时,只能从每组值中取用一个数字,也可以将英文表示用加号相连。
 title  字符串表达式,对话框标题
 返回值列表
  英文表示  数值 按钮
  vbOK  1  确定
  vbCancel  2  取消
  vbAbort  3  放弃
  vbRetry  4  重试
  vbIgnore 5  忽略
  vbYes  6  是
  vbNo  7  否
◎DHTML对象中Document对象的应用
应用举例:
<SCRIPT LANGUAGE="VBScript">
<!--
SubButton1_OnClick  '定义过程,相应Button1的OnClick事件
  Dim TheForm,text1v
  Set TheForm =Document.formname2 '用SET将TheForm声明成一个对象
  text1v=Theform.Text1.value
 theform.text1.value="haha" '修改TEXT1的VALUE值
   MsgBox(text1v)
End Sub
-->
 </SCRIPT>
<FORM NAME="formname2">
请输入一个数字:
 <INPUT NAME="Text1" TYPE="TEXT" size=3>
<INPUT NAME="Button1" TYPE="BUTTON" VALUE="提交">
</FORM>
可以读取输入的值。
document对象控制所有HTML语言中写在代码里面的内容,它可以读取和修改HTML语言的代码,也可以控制表单对象。
◎ if……then……else……end if
应用举例:
sub FixDate()
Dim myDate
myDate=#2/13/95#
if myDate<Now Then '其中Now为当前时间函数
myDate=Now
end if
end sub
◎if……then……elseif……then……elseif……else……end if
◎条件判断语句:A>2 ? B=1:B=2
如果A>2则赋值B=1,否则赋值B=2
◎选择分支语句:
select case 表达式
 case"值1"
  执行过程1
 case"值2"
  执行过程2
 case"值3"
  执行过程3
 case"值4"
  执行过程4
 ……
 caseelse  '默认值,即如果不符合上述判断的情况
  执行默认过程
end select

发表评论:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

日历

Search

最新评论及回复

最近发表

Powered By Z-Blog 1.8 Spirit Build 80710

Copyright 2008 世界的角落. All Rights Reserved.如有涉及侵犯您权益的情况,请和我联系!