ASP网页设计制作(配合李炎恢asp 视频教程).doc

ASP网页设设计张国策，机械电子工程专业第1章ASP 学前准备ASP导论（ASP相关知识）1.2.1 什么是ASP在Internet 风行的早期，Web 网页只是静态的图文组合，浏览者可以在网页上阅读信息，但无法做进一步的查询、发表意见或进行电子商务、在线交谈、问卷调查、预约订票、访客留言簿、讨论区、电子贺卡、E-MAIL 自动回复、数据库管理等工作，这显然不能满足人们越来越多元化的需求。为此，开始有不少公司提出动态网页的解决方案，所谓的“动态网页”指的是浏览器端和服务器端可以互动，也就是服务器端可以实时处理浏览器端的请求（Request），然后将处理结果响音给浏览器端，而ASP（Active Server Pages）便是微软用来建立动态网页的解决方案。ASP 是一种服务器端的指令环境，用来建立并执行交互式Web 服务器应用程序，您可以使用ASP 来结合服务器端指令、HTML 网页及COM 组件，换句话说，ASP 程序包含“脚本语言程序”（Scripting Language） 、“嵌入HTML（Embedded HTML）”“ COM 组件调用”等3 个部分，前者可由VBScript,Jscript(微软版的JavaScript)、PerlScript、Python、REXX 等程序语言赚写而成。也正由于ASP 程序可以嵌入HTML，因此，现有的HTML 文件（扩展名为.htm）很快便可以转换成ASP 程序（扩展名.asp）.ASP 的第一个版本是0.9 测试版，它能够将代码直接嵌入HTML，使设计Web 页面变得更简单、更强大，并且通过内置的组件能够实现强大的功能，如ADO，AcitveX Data Objects组件，通过它可以访问任何符合ODBC（Open DataBase Connectivity）标准的数据库。接着ASP1.0 作为Internet 信息服务器（Internet Information Server,IIS）的附属产品免费发送，不久在Windows 平台上广泛应用。1998 年，微软公司发布了ASP2.0 版本，与1.0 版不同的是，2.0 增加了功能更加强大的外部组件。在微软公司开发出Windows2000 操作系统后，ASP 也升级到3.0 版本，目前的应用大多是在2000Server 和ASP3.0 的环境下使用的。1.2.2 ASP 的含义：（1）Active:ASP 使用了Microsoft 的ActiveX 技术，它采用封装对象、程序调用对象的技术，简化编程，加强程序间的合作。ASP 本身封装了一些基本的组件和常用组件，只要在服务器安装这些组件，通过访问组件，就可以快速、简易地建立Web 应用。（2）Server:ASP 运行在服务器端，这样就不必担心浏览器是否支持ASP 所使用的编程语言了。（3）Pages:ASP 返回标准的HTML 页面，可以在常用的浏览器器中正常地显示。浏览者查看源文件时，看到的是ASP 生成的HTML 代码，而不是ASP 的程序代码，这样就可以防止别人抄袭自己的程序。1.2.3 ASP 程序特点：(1).使用VBScript,JavaScript 等简单易懂的脚本语言，结合HTML 代码，即可快速地完成网站应用程序的编写。(2).无需编译、容易编写，可在服务器端直接执行。(3).使用普通的文本编辑器，如Windows 的记事本，即可进行编辑设计。(4).与浏览器的无关性。用户端只要使用可执行HTML 代码的浏览器1.2.4 ASP 的运行原理ASP 本身的意义是从服务器端传送信息到客户端时的前置处理过程。这项处理功能由嵌在服务器端的动态链接库（DDL）asp.dll 来完成。如果客户端要访问的是服务器端的”.HTM”文件，则服务器端直接把该文件传送给客户端。如果客户端要访问服务器端是“.ASP”文件，则服务器端会自动地解释执行该程序，并把结果信息转换成HTML 信息再传送给客户端。如果客户端要访问的是服务器端“.SHTML”文件，则服务器端先对该文件做Include 处理，再把文件传送给客户端。ASP 程序只能在Web 服务器端执行，当浏览器向服务器要求运行ASP 程序时，服务器会读取该程序，然后执行该程序并将结果转换为HTML 文件，再将HTML 文件传送给浏览器，待浏览器收到HTML 文件之后，便会执行结果显示在浏览器上。为了证明浏览器所收到的是HTML 文件，而非ASP 程序，我们来看个例子，在这个例子中，凡是用符号括起来的语句均为ASP 程序，且程序的扩展名为.asp,现在时刻为1.3.1 浏览器端Script 与服务器端Script 有什么分别浏览器端Script(脚本语言)：严格来说，诸如HTML、XML 或CSS 所撰写的网页皆属于静态网页，无法满足每个人的需求，比方说，有人会希望网页显示实时更新的资料（如股票行情），而有人会希望当浏览者选取网页的某个组件时，组件的外观会随之改变，凡此种种都需利用程序才办得到，而且为了不影响传输速率，程序还得越小越好。目前这类需求可以通过浏览器端Script 来完成，Script 是一段嵌入在HTML 源代码内的小程序，而浏览器端Script 就是在浏览器执行的小程序。Netscape 公司开发的JavaScript和Microsoft 公司开发的VBScript 均可以用来撰写浏览器端的Script, 其中尤其JavaScript 为主流，因为市场上两大商用浏览器Communicator 和Internet Explorer 均支持JavaScript,而VBScript 则只有Internet Explorer 才支持。服务器端Script(脚本语言)：虽然浏览器端Script 已经可以完成许多工作，但有些工作还是得在服务器执行Script 才可以，譬如数据库的存取与搜索。由于在服务器端执行Script 必须拥有特殊权限，而且会增加服务器端的负担，因此，如有可能的话，网页的设计者应尽量用浏览器端Script 必须或DHTML 技术取代服务器端的Script.目前常见的服务器Script 有ASP 程序和CGI 程序两种，ASP 是”Active Server Pages”的缩写，中文翻译为“动态服务器网页”，ASP 程序是Microsoft IIS(Internet InformationServices)或PWS（Personal Web Server）等Web 服务器执行的Script,通常是由Vbscript或JavaScript 撰写而成。现在时刻为CGI 是“Common Gateway Interface”的缩写，中文翻译为“通用网关接口”，这是在服务器与程序之间传送信息的标准接口，而CGI 程序则是符合CGI 标准接口的Script,通常是由Perl 或C 撰写而成。第2章VBScript 基本概念2.1 VBScript 是什么VBScript 程序语言是Microsoft 公司VB（Visual Basic）程序语言加以简化，使其较易学习，且完全以配合网页设计为发展重点，除去了有安全性顾虑的指令，诸如读写删除文件或者执行系统调用程序等，使设计者可安心地在Internet 上传送。此外，又加上合适其他操作系统可移植性，并大大提升了执行效率，使得VBScript 广受网页设计者的欢迎。2.2 撰写第一个VBScript 程序(1).告诉浏览器使用VBScript 脚本语言。(2).msgbox 显示信息：msgbox 会在浏览器窗体中强制显示一个信息框。双引号之间是信息框的内容。(3).一般Script 程序代码会放在注释符号中间。为了防止部分浏览器无法显示VBScript 程序时，就把程序视为忽略。2.3 变量（Variable）变量是程序中声明-个名字，它会使计算机提供一个预留的内存空间，您可以利用这个名字存储任何数字或文字。一般程序语言在声明变量名称时，就必须指定变量的数据类型，但VBScript 只提供用户一种变量类型，称为不定型数据类型(Variant),它可以存储任何类型的值，这对初学者而言又是一项非常方便的功能，因为不会被各种数据类型弄得晕头转向，也不会常常出现变量数据类型不匹配的错误信息。2.4 第二范例 score=75 变量score的值为75 msgbox 您的成绩 & score score=90 变量score的值改为了90 msgbox 您的成绩已改为& score注：msgbox 中的&符号为字符串连接符号符号为注释符号。2.4 数组数组就是很多的名称相同的变量聚集在一起，数组的用法和普通的变量是完全一样的，它也可以存入任何数据类型，唯一的不同点是它在内存中占据的是一块连续的空间，您可以依序给它们编号，再依编号来使用它们。使用数组之前一定要先声明名称，这是和普通的变量不同的地方。2.5 第三个范例 dim box(9) box(2)=100 msgbox 数字1=& box(1) msgbox 数字2=& box(2)(1).dim box(9)定义声明一个0-9 的数组格式： dim 数组名()(2).redim score(4)可以重新定义一个数组格式：redim 数组名()(3).redim preserve 数组名(n)保留原来的数组2.6 第四个范例 dim score() 定义一个不确定个数的数组 redim score(3) 重新定义变量的个数 score(0)=90 score(1)=86 score(2)=99 score(3)=54 cr=chr(13) & chr(10) 换行符号 msg=score(0) & cr & score(1) & cr & score(2) & cr & score(3) msgbox msg redim score(4) score(4)=78 msg= msg= score(0) & cr& score(1) & cr& score(2) & cr & score(3) & cr & score(4) msgbox msgscript2.7 常数什么是常数，常数是一种不会改变的数，也就是说它原来就存在于程序软件内，而且不会任意改变它所代表的值。2.8 第五个范例 msgbox HELLO & vbcrlf & VBScript2.9 第六个范例const pi=3.14 定义圆周率为常数 circle=3 area=circle2*pi msgbox 面积为 & area2.11 运算符（1）数字运算符+加法运算12+3=15- 减法运算12-5=9* 乘法运算12*3=36/ 除法运算12/3=4 整数除法73=2 指数123=1728mod 余数20 mod 3=2& 字符串连接您 & 好=您好A=3B=2 Msgbox A=& A& vbcrlf & B=& B& vbcrlf &_ A+B= &A+B& vbcrlf &_ A-B=& A-B& vbcrlf &_ A*B= &A*B& vbcrlf &_ A/B=& A/B& vbcrlf &_ AB=& AB& vbcrlf &_ Amod B=& Amod B & vbcrlf &_ AB= &A B& vbcrlf &_ A&B=& A& B2.13 比较运算符比较运算符会比较两个表达式，如果比较的结果是正确的，就会返回True（真）；如果比较结果是错误的，就会返回False。例如：1020就会返回False。通常程序设计者可以根据比较运算符所返回的值，做不同的处理。VBScript 常用的比较运算符整理如表：符号注释例子返回值= 等于21+5=18+8 True 不等于21+518+8 False 小于18+3 大于18+318 True= 小于等于18+3= 大于等于18+3=21 True2.14 逻辑运算符逻辑运算符是结合两个比较运算，再返回一个True或False值：最重要的逻辑运算符是And及Or.And是两个比较运算都正确时，才返回True，其余都返回False.And和比较运算整理如表：第一个比较运算第二个比较运算例子返回值True True 2021 and 5040 TrueTrue False 3021 and 5040 FalseFalse True 3040 FalseFalse True 3021 and 5021 or 5040 TrueTrue False 3021 or 5040 TrueFalse True 3040 TrueFalse False 3021 or 5040 False2.15 第八个范例 msg1=1512 and 4030 的值为& (1512 and 4030) msg2=1512 and 4012 and 4030) msg3=1530 的值为 & (1512 or 4030) msg4=1512 or 4030 的值为& (1512 or 4030) msgbox msg1 & vbcrlf & msg2& vbcrlf & msg3 & vbcrlf & msg4第3章VBScript 流程控制3.1 认识流程控制结构我们上一章所用的范例都是一些相当简单的程序。所谓的“简单”就是指程序执行只有一个由上而下的方向，而不会转弯或跳行，但实际上平常所应用的程序并不会这么简单，一般的程序都会依据不同的情况而换行，因为这样的程序才能应付各种不同的情况，这时就需要流程控制结构来帮组设计师控制程序执行的方向。流程控制结构通常要借助逻辑数据的帮助才能运行，流程控制结构共有6种，我们一一来介绍。3.2 if的第一种格式：如果.就.（单一选择）if 条件then 程序代码这是if指令最简单的格式“单一选择”，其中的“条件”是一个表达式，它所计算的结构必须是一个逻辑数据，如果“条件”的计算结果是“True”，那么就会执行Then后面的“程序代码”；如果“条件”的计算结果是“False”，那么就会跳过整个if语句，而不会执行Then后面的“程序代码”。Then后面的“程序代码”如果跟Then不是同一行或是程序代码有很多行，那就要在最后加上end if以结束if条件语句。 score=70 if score=60 thenmsgbox 及格!3.3 if的第二种格式：如果.就.否则.（双向选择）if 条件then 程序代码一else 程序代码二end if score=InputBox(请输入计算机成绩：,输入成绩) if score=60 then msg=及格！else msg=不及格！ end if msgbox 您的计算机成绩& msg3.4 输入函数InputBox用法变量=InputBox(显示信息,窗口标题)InputBox函数可以提供对话框让用户输入信息，并将用户输入的信息存入等号左边的变量中；3.5 if的第三种格式：多向选择if 条件then 程序代码一elseif 程序代码二elseif 程序代码三.else 程序代码Nend ifscore=InputBox(请输入计算机成绩：,输入成绩)if score=90 then msg=优等elseif score=80 then msg=甲等elseif score=70 then msg=乙等elseif score=60 then msg=丙等else msg=丁等end ifmsgbox 您的计算机成绩为& msg3.6 select.case这种流程控制结构可以根据一个变量的值而有不同的执行方向。select case 变量case 值一 程序代码一case 值二 程序代码二case 值三 程序代码三.case else 程序代码Nend selectno=InputBox(请输入一个15之间的数字：,汉译英)select case nocase 1 msg=ONEcase 2 msg=TWOcase 3 msg=THREEcase 4 msg=FOURcase else msg=FIVEend selectmsgbox no & 的英文为& msg3.7 for-next （计数循环）计算机最擅长的功能就是重复执行某项功能，如果每执行一次就要写一次程序代码的话，大部分的程序必然非常的庞大，“循环”指令就是用来解决重复执行的问题。for 变量起始值to 终止值step 步长total=0for i=1 to 10 total=total+inextmsgbox 1 加到10 的总和为& totaltotal=0for i=2 to 100 step2 total=total+inextmsgbox 2+4+6+100=& total用循环显示九九表document.write for i=1 to 9 total=for j=1 to 9 total=total& & i& *& i& =& i*j & Next total=total& document.write totalNextdocument.write 注：document.write 是浏览器中的一个方法，在浏览器中有许多对象的属性和方法可供设计人员使用，浏览器将自己本身的各部分，包括窗口、属性、标记等分成各种对象，而每个对象又提供不同的属性和方法。dim a(99)for i=0 to 99 a(i)=i+1 document.write a(i) & nextdim score(3)score(0)=90score(1)=86score(2)=99score(3)=54用循环打印每一位学生的成绩 for i=0 to 3 msg=msg & 第& i+1 & 个学生分数为& score(i) & vbcrlfnextmsgbox msg3.8 条件式循环do whileloop 循环格式: do while 条件程序代码loop这中循环在执行到do while时,会检查”条件”的返回值,若返回值为”True”,就执行”程序代码”,碰到loop时又回到do while再检查”条件”的成立与否.若”条件”的返回值为”False”,则跳到loop的下一个指令(即离开循环).此处的”条件”弹性很大,只要”条件”为”False”时就会结束循环,不必限制循环执行的次数,使用范围比fornext大很多.英文单词测试,不管大小写都正确ans=inputbox(请输入”快乐”的英文)do while ucase(ans)HAPPY msg=不正确& vbcrlf & 请重新输入”快乐”的英文 ans=inputbox(msg)loopmsgbox 太棒了!您答对了注:ucase()函数可将括号内的字符串全部转换为大写字母3.9 Do UntilLoop 循环格式: Do Until 条件程序代码LoopUntil 循环与While循环不同点就在于,Until是测试”条件”是否不成立,也就是是否为”False”,若是”False”则执行循环内的”程序代码”,反之则跳出循环. 英文单词测试,不管大小写都正确 ans=inputbox(请输入”快乐”的英文) do until ucase(ans)=HAPPY msg=不正确& vbcrlf & 请重新输入”快乐”的英文 ans=inputbox(msg) loop msgbox 太棒了!您答对了3.10 WhileWend循环这种循环和DoLoop完全一样. 英文单词测试,不管大小写都正确 ans=inputbox(请输入”快乐”的英文) while ucase(ans)HAPPY msg=不正确& vbcrlf & 请重新输入”快乐”的英文 ans=inputbox(msg) wendmsgbox 太棒了!您答对了第4 章子程序与函数4.1 子程序(Subroutines)什么是子程序？“子程序”是将一段具有某种特定功能的语句区块单句撰写成一个独立的程序，给予特定的名称，它的格式如下：sub 子程序名称(参数1,参数2,. .) 程序代码end sub子程序一定要有名称，调用子程序时就会使用到它的名称。如果没有调用它，子程序并不会执行，请看下面范例。 msgbox 我在外面 sub A msgbox 我在里面 end sub msgbox 我在外面 A sub A msgbox 我在里面 end sub4.2 调用子程序名称(参数1,参数2,.)方法一：call 子程序名称参数1，参数2方法二：子程序名称参数1，参数2。 sub chang(c) degree=c*1.8+32 msgbox 摄氏 & c & 度转换为华氏& degree & 度 end sub degreec=inputbox(请输入摄氏度：) chang degreec msgbox 我在外面 A msgbox 我在后面 sub A msgbox 我在里面 end sub4.3 局部变量和全局变量 A msgbox i 等于& i sub A i=10 end sub为什么这里弹出的信息框I的值为空呢，因为子程序里面的I变量是局部变量，到子程序外面已经超出了变量I的有效范围,所以到了子程序之外后变量“I”失效了。 dim i A msgbox i 等于& i sub A i=10 end sub这个程序在子程序之外先用“DIM I”对变量“I”进行声明，这时变量“I”就会变成了“全局变量”，所谓的全局变量就是指不管在程序的哪一部分，包括子程序之内，这个变量都有效果。一般变量只要在子程序之外先声明或是先出现就会变成全局变量，反之就是局部变量。所以只要跳出该程序，那么局部变量就会失效。4.4 终止执行子程序一般子程序执行到end sub 就会结束，但也可以提早结束子程序，而直接跳回原来调用子程序的地方。 A sub A I=10 exit sub msgbox 我不会执行到 end sub在程序中直接使用“Exit sub”来跳出子程序，所以msgbox “”不会执行到。4.5 事件驱动在VBScript中，子程序不仅扮演执行重复动作的角色，还可以侦测到用户对浏览器所做的操作。格式：sub 对象_操作所要响应的程序代码end subsub document_onclick msgbox 您按到我了！end sub在这个例子中，我们点击了页面单击鼠标时，就会驱动document_onclick这个子程序，而出现一个对话框。“对象”_”事件”中间要以下滑线隔开。4.6 函数(Functions)在写程序时，常常遇到一些相同的代码。那么我们经常会用调用的方法去处理。而函数的结构及用法与子程序几乎相同，唯一不同的是函数可以在执行结束的时候返回一个值，而子程序不会。函数是以“Function”开始，”End Function”结束。格式：function 函数名称(参数1，参数2. . .)程序代码函数名称=程序代码end function function circle(n) circle=n*n*3.14 end function msgbox 半径为10的圆面积为& circle(10) function sum(n) total=0 For I=1 to n total=total+I next sum=total end function number=InputBox(请输入一个整数：) mysum=sum(number) msgbox 1 加到& number & 的总和为& mysum函数不仅能够传入一个参数，您也可以根据实际需求而传入多个参数。 function sum(n,s) total=0 for I=s to n total=total+I next sum=total end function start=inputbox(请输入初始值：) number=inputbox(请输入一个整数) mysum=sum(number,start) msgbox start & 加到& number& 的总和为& mysum第5 章内置函数5.1 VBScript 内置函数在前面，我们介绍了函数的使用与建立方法，其实有很多函数是不用自己动手来建立的，VBScript 早就准备好了许多常用的函数来供您调用，下面就一一来说明一些常用的函数。5.2 日期与时间函数VBScript 提供了许多显示日期与时间的函数，如表:函数用途Now显示今天的日期与现在的时间Date 显示今天（计算机系统）的日期Time 显示现在(计算机系统)的时间Year 显示本年的年份Month 显示本月的月份Day 显示今天的日期Hour 显示现在的时间几点钟Minute 显示现在的时间几点钟Second 显示现在的时间几秒钟 msgbox 现在是 & Now() msgbox 今天的日期& Date() msgbox 现在的时间& Time() msgbox 今天的日期是 & Year(Date) & 年 & month(Date) & 月 &_Day(Date)& Day(Date)& 日 msgbox 现在的时间是 & Hour(Now) & 时 & Minute(Now) & 分 &_Second(Now) & 秒这个例子中， now(),date(),time() 这三个内置函数不需要传入参数， 而year(),month(),day(),hour(),minute()，second()是需要传入参数的。 SetTimeOut Clock,1000 sub Clock() H=Hour(Now) M=Minute(Now) S=Second(Now) NowTime=现在时间是& H& 点& M& 分 & S& 秒 NowT.InnerHtml=NowTime SetTimeOut Clock,1000end sub程序一开始会执行到SetTimeOut “Clock”,1000 ,这段程序代码的意思1秒之后执行子程序”Clock”,”SetTimeOut”这个语法可以让计算机上在隔一段时间后去执行某个子程序，它的格式如下：SetTimeOut “子程序名称”,时间其中的时间是以千分之一秒为单位，也就是1秒钟，在1秒之后执行子程序“Clock”,所以写成SetTimeOut “Clock”,”1000”;执行子程序“Clock”时就会使用到时间函数将现在的时间分别存放在变量H，M，S中，接着再用NowT.InnerHtml方法将现在的时间写如网页里， InnerHtml也是浏览器提供的一种方法，她的用途将文字写到指定的HTML标记，前面的“NowT”就是指定要写入的HTML标记。5.3 sqr()函数sqr()函数可以返回参数的平方根! a=inputbox(请输入一个整数) msgbox a & 的平方根为 & sqr(A)5.4 abs()函数abs()函数可以返回一个数的绝对值 a=inputbox(请输入一个整数) msgbox a & 的绝对值为 & abs(a)5.5 IsNumeric() 函数IsNumeric 函数可以侦测传入的参数是否为数字，如果是数字，那么就会返回True，如果不是数字，则返回False a=inputbox(请输入一个整数) do while not IsNumeric(a) a=inputbox(您输入的不是整数，请重新输入！) loop msgbox a & 的绝对值为 & abs(a)5.6 MsgBox() 函数弹出一个信息框格式： msgbox (“显示内容”,图标名称)名称值说明VbCritical 16 显示“重要信息”图标VbQuestion 32 显示“询问符号”图标VbExclamation 48 显示“警告符号”图标VbInformation 64 显示“信息符号”图标 msgbox 重要信息,vbcritical 16 msgbox 询问符号,vbquestion 32 msgbox 警告符号,vbexclamation 48 msgbox 信息符号,vbinformation 64 msgbox 发现系统漏洞,请确定修补漏洞！,16,金山毒霸提醒您5.7 msgbox (“显示内容”，按钮名称)名称值说明VbOKOnly 0 只显示“确定”按钮VbOKCancel 1 只显示“确定”及“取消”按钮VbAbortRetryIgnore 2 显示“终止”，“重试”及“忽略VbYesNoCancel 3 显示“是”，“否”及“取消”VbYesNo 4 显示“是”及“否”按钮VbRetryCancel 5 显示“重试”及“取消”按钮 msgbox 按钮范例,0 msgbox 按钮范例,1 msgbox 按钮范例,2 msgbox 按钮范例,3 msgbox 按钮范例,4 msgbox 按钮范例,5 msgbox 图标按钮,3+325.8 判断用户所按下的按钮按钮值常数值按钮VbOk 1 确定VbCancel 2 取消VbAbort 3终止VbRetry 4 重试VbIgonre 5 略过VbYes 6 是VbNo 7 否dodoa=inputbox(请输入一个数字,计算绝对值)loop until IsNumeric(a)msgbox a & 的绝对值 & abs(a)loop until 2=msgbox (是否要继续,1+32)5.9 UBound()函数与LBound()函数格式：UBound(数组名)将数组名传入这两个个函数可以得到数组的上限和下限，在使用动态数组的时候经常会用到，因为使用动态数组通常都是根据当时的情况来配置大小，所以无法实现得知数组的大小，这时就必须使用到这个函数。 dim a(3) msgbox a 的数组的最低值为 & LBound(a) msgbox a 的数组的最高值为 & UBound(a) dim a(3) msgbox a 的数组的最低值为 & LBound(a) msgbox a 的数组的最高值为 & UBound(a) dim a(10) for i=Lbound(a) to Ubound(a) total=total+i next msgbox total= & total5.10 Int() 函数这个函数必须传入一个参数，并将这个参数的整数部分返回。 a=3.9359459 msgbox a 的整数为& int(a)5.11 Fix()函数这个函数和Int() 函数相同，也必须要传入一个参数，并将这个参数的整数部分返回来。它和Int()函数的不同点是：如果传入的参数为负值时，那么Int()函数返回的值小于负值的第一个值，而Fix()函数会返回大于负数的第一个值。 a=-3.9359459 msgbox Int(a)= & int(a) msgbox Fix(a)=& Fix(a)5.12 Rnd()函数这个函数可以产生介于01之间的随机数，使用加上Randomize 来声明要使用随机数。由于Rnd()所产生的随机数时介于01之间的数，所以您必须用一些小技巧才可以使用