VBS基础教程
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
| 是用"编号"的概念去理解, 因为4维以上的数组就比较难以用欧几里德几何概念去解释了). 二维数组是很好解释的, 我们来看一下: 复制代码 代码如下: dim a(2,2) ''从零开始, 一共有3 X 3 = 9 个数据 dim i,j ''需要两个计数器 for i=0 to 2 for j=0 to 2 ''使用嵌套循环 a(i,j)="X" next next 我们创建了一个这样的二维数组(那些","是我用来分割元素的,并不存在), 了解二维数组的了吗? 不清楚我们再讲一下 编号 0 1 2 0 X,X,X 1 X,X,X 2 X,X,X 二维数组的看起来是不是就是一个矩形呢?(你在内存中看不到这样的矩形, 只是便于你理解), 每个数据都有编号, 由两个数来定位, 这个很像(非常像)你在国际象棋棋盘上寻找一个格, 我们用类似"C6","A2"这样的"垂直坐标"进行定位, 对, "垂直坐标", 很确切. 我们要使用一个二维数组元素的时候可以和普通变量一样使用, 只要指定数组元素的"定位点"就可以了, 例如a(0)(1)=1, b(2)(1)="你好", 诸如此类. 要注意的是二维数组也只能储存类型相同的元素, 而且上标(起点)也从0开始. 计算一个二维数组的元素个数只要把两个下标+1(以得到实际的值)再乘起来就可以了, 非常类似于求一个矩形的面积. 假如需要储存的都是同一类型的数据, 我们就可以用二维数组, 比如要储存5个人的姓名,国籍,民族, 就可以使用二维数据 复制代码 代码如下: dim info(4,2) ''一共五个人, 要储存的数据类型有3项 dim i,j for i=0 to 4 for j=0 to 2 dim opt ''定义一个变量用于存储数据项提示 select case j ''判断应该输入的是什么数据 case 0 opt="姓名" case 1 opt="国籍" case 2 opt="民族" end select info(i,j)=inputbox("请输入第" & i+1 & "个人的" & opt) next next ''输出太麻烦了, 我懒得动, 你知道那么回事就行了 这样就不需要定义3个一维数组了. 多位数组(三维以上)的定义和使用方法与二维数组一样, 但不太好在欧几里德几何空间里加以解释, 幸好我们并不太常用那么多维的数组.定义一个三位数组:dim a(1,2,3) ''一共24各数组元素. 要点: 1) 一维数组是"线", 二维数组是"面", 三维数组是"体" (多维数组就乱套) 2) 数组的下标从0开始 3) for循环在数组的应用中起了很大作用, 二维数组需要嵌套循环 作业: 上次出的"百鸡问题", 大家喜欢吗? 以后我们就做这种需要动脑的题目, 那些简单的实践, 大家一定要多做! 1) 定义一个数组, 包含5个元素, 都是随机整数(随便输入), 要求把他们按照从大到小的顺序排列起来 2) 有两个二维数组a(4,4)和b(4,4) (元素值随便), 交换两个数组(原来的a的所有元素值变成b的, b的所有元素值变成a的) 第六篇（最后一篇） 今天我们学习基础篇的最后一个部分：自定义函数和过程. 我们每天都在和函数打交道, inputbox()是函数, msgbox )是函数, int(也是函数...这些函数都是系统内建的, 我们只能用不能改. 今天, 我就教大家怎样自己制作一个函数. 首先我们要了解, 为什么要用函数, 我们用"实例"说话, 先看一个例子: 给出两个数, 输出较大的那一个. 复制代码 代码如下: dim a1,a2,b1,b2,c1,c2 a1=2:a2=4 ''":"可以让你把多个语句写在一行上 b1=32:b2=67 c1=12:c2=898 if a1>a2 then msgbox a1 elseif a1<a2 then msgbox a2 end if if b1>b2 then msgbox b1 elseif b1<b2 then msgbox b2 end if if c1>c2 then msgbox c1 elseif c1<c2 then msgbox c2 end if 多么麻烦呀, 我们把相同的比较过程复制了好几遍, 早 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
上一篇: VBS 硬盘读写统计(分区读写统计)下一篇: VBS For Next循环的一些细节
关于VBS基础教程的所有评论
