VBS基础教程
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
| . 数组的元素可以看成一个个独立的变量, 你可以像独立的变量那样使用他们. 数组元素的量可能是毫无关系的, 比如第一个数组元素储存你的年龄, 第二个储存今年西瓜的销售量, 但这种做法是不鼓励的, 甚至是不被接受的, 不要这么干, 这样的情况请定义独立的变量. for语句在数组中可算是大显身手, 还记得for吗? 它累加一个变量, 我们可以把这个变量应用在数组中正好用来读取或者填充按照顺序排列的数组元素, 上面就是这样一个例子. 数组其实是很简单的东西(再BASIC语言里面), 数组难的是怎么捣弄这些循环, 让他们按照你的要求运转. 这个等到二维数组再说, 我们先看看如何手工填充数组. 如果你这个都想不到的话, 那你真是白学了: 复制代码 代码如下: dim name(7),str ''一共八个学生, str变量是用来把他们储存成一个字符串以便输出 for i=0 to 7 name(i)=inputbox("请输入第" & i+1 & "个学生的名字") str=str & " " & name(i) next msgbox str 这样我们就有了一个小小的数据库, 它们的数据排列可以看成这样: name(0),name(1),name(2).....name(7) 看到了吧, 所以我说我们可以把它看成是"一条线", 等到我们学到了文件操作, 就可以把他们输出到文件中去了. 一维数组有很多用处, 我们来看一下一个复杂的例子. 我们要储存3各学生的名字, 身高, 成绩这三种数据, 由于名字是字符串, 而身高可能是浮点数(带小数点的数), 成绩则可能是整数, 所以我们不能把他们储存在一个数组里面(不要忘记, 数组织只能存储同类的数据), 所以我们要建3个数组, 以下是例程: 复制代码 代码如下: dim name(2), high(2), mark(2) ''定义三个数组分别储存3个人的名字, 身高和得分 dim ctr ''计数器 for ctr=0 to 2 name(ctr)=inputbox("请输入第" & ctr+1 & "个学生的姓名") high(ctr)=inputbox("请输入第" & ctr+1 & "个学生的身高") mark(ctr)=inputbox("请输入第" & ctr+1 & "个学生的得分") next OK, 我们已经填充好了数据, 现在我们的小小数据库只能按顺序输入, 我们要让它看起来像点样子, 我们来给他设计查询功能: 复制代码 代码如下: ''接着上面的程序 dim cname, temp ''要查询的名字, 和一个临时变量, 用来储存数据的位置 cname=inputbox("请输入你要查询的名字:") for ctr=0 to 2 ''遍历所有name数组的成员, 寻找要查询的名字 if name(ctr)=cname then temp=ctr ''记录数据位置 exit for ''退出循环, 和exit do的用法一样 end if ''不要忘了end if next msgbox "姓名:" & name(temp) & " " & "身高:" & high(temp) & " " & "得分:" & mark(temp) 嘿嘿, 有意思吧, 其实在这个程序里面, 那个temp变量完全没有必要, 只是为了更清楚地说明问题. 因为当exit for以后ctr变量的值就不会改变, 储存的正好是对应数据在数组中的位置, 写这个temp变量是为了照顾到以后要学C++的朋友(C++可以在for语句里声明新变量, 只在这个for结构中有效, 所以到了外部就不能访问了). 也就是说可以简化成如下: 复制代码 代码如下: dim cname cname=inputbox("请输入你要查询的名字:") for ctr=0 to 2 if name(ctr)=cname then exit for ''因为只有exit for就不需要块if了 next msgbox "姓名:" & name(ctr) & " " & "身高:" & high(ctr) & " " & "得分:" & mark(ctr) 这是最直接的路子. 好好重读一下上面所有的源代码, 然后自己写几个程序, 完全搞清楚一维数组及其应用以后再看后面的二位数组. 二维数组好像是一个一维数组的集合, 就好像"线积成面"一样, 由n各一维数组组成二维数组, 这是初学者比较好理解的办法(比较精确的 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
上一篇: VBS 硬盘读写统计(分区读写统计)下一篇: VBS For Next循环的一些细节
关于VBS基础教程的所有评论
