• 空间首页
• 空间管理
• 51Testing软件测试网
• 站点论坛
• 添加我的日志

我的最新日志

• vbs 二维数组

  2008-3-31

  二维数组的看起来是不是就是一个矩形呢?(你在内存中看不到这样的矩形, 只是便于你理解), 每个数据都有编号, 由两个数来定位, 这个很像(非常像)你在国际象棋棋盘上寻找一个格, 我们用类似"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各数组元素.
  　　今天因为要搬家(我喜欢Sengkang啊, 可是MM嫌交通不便, 谁不知道她只想去逛街),而GF要去和她的同学去参加什么试验半夜才回家, 所以下午我只能自己去押车搬家了, 5555~~好可怜, 这次就请大家原谅我少写一点, 我可是站在图书馆外写的啊,
  现在腿都软了~~~ 本来还要讲"动态数组"的, 但想了想还是放到"进阶部分"再说吧.
  要点:
  1) 一维数组是"线", 二维数组是"面", 三维数组是"体" (多维数组就乱套)
  2) 数组的下标从0开始
  3) for循环在数组的应用中起了很大作用, 二维数组需要嵌套循环
  作业:
  　　上次出的"百鸡问题", 大家喜欢吗? 以后我们就做这种需要动脑的题目, 那些简单的实践, 大家一定要多做!
  1) 定义一个数组, 包含5个元素,　都是随机整数(随便输入), 要求把他们按照从大到小的顺序排列起来
  2) 有两个二维数组a(4,4)和b(4,4) (元素值随便), 交换两个数组(原来的a的所有元素值变成b的, b的所有元素值变成a的)
  
  最后一篇：
  新家不错, MM开心, 我也就跟着高兴了 : ), 今天我们学习基础篇的最后一个部分:自定义函数和过程. 我们每天都在和函
  数打交道, 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
  　　多么麻烦呀, 我们把相同的比较过程复制了好几遍, 早期语言没有结构化(没有过程和函数)的时候, 程序员们的确是这么
  干的, 他们复制(Copy), 那个年代也没有剪贴板这一说, 大家都是重新输入代码. 后来工作简化了:
  
  dim a1,a2,b1,b2,c1,c2
  a1=2:a2=4
  b1=32:b2=67
  c1=12:c2=898
  msgbox(co(a1,a2))
  msgbox(co(b1,b2))
  msgbox(co(c1,c2))
  function co(t1,t2) '我们使用function定义了一个新的函数
  if t1>t2 then
  co=t1 '通过"函数名=表达式"这种方法返回结果
  elseif t2>t1 then
  co=t2
  end if
  end function  
  我们在这里是用了一个新的关键字:funciton, 这个关键字表示一个新函数开始, 格式:
  funciton 函数名(参数1, 参数2...参数n) '列表可以是空的, 但括号不能省略, 参数之间用","分割
  ...
  exit funciton '结束函数, 不是必需的
  ...
  end function
  　　函数是一个模块, 只有你调用的时候才会运行, 也就说, 当你编写了一个函数, 然后在程序中并不调用它, 那么这个函数
  永远不会运行. 一般来说, 我们编写程序是按照:
  主程序
  ..
  ..
  ..
  函数1
  ..
  ..
  函数2
  ..
  ..
  　　详细解释一下: 函数中最重要的是参数和返回值. 参数是在函数名后面的()里定义的, 用","分割, 使用参数的时候我们也
  用","分割. 说到这里我想起一件事, 昨天有个朋友给我发消息问我:
  　　msgbox(name1,name2,name3)
  　　这个错在哪里? 为什么不能同时显示出三个变量? 这就是因为你用了",", 这个符号表示你输入的三个量作为三个不同参数
  传递给msgbox()函数, msgbox()函数只会显示出第一个参数, 第二个参数的作用是出现在标题栏. 所以你应该用"&"或者"+"把
  三个字符串变量连接起来, 作为第一个参数传递给msgbox()函数. 程序员说参数的时候经常说到"形参", "实参"这样的"黑话",
  我来解释一下. "形参"是"形式参数"的简称, "实参"是"实际参数"的简称, 实参是指你调用函数的时候传递给函数的量, 可以
  使变量或者常量(直接量), 例如:co(12,24)中的12,24就是实参. 形参是你在函数定义时定义的变量, 这些变量用来"接住"传递
  过来的量, 例如function co(t1,t2)t1,t2就是形参.
  　　在VBscrīpt中, 参数传递是一种传值,　而不是传址(听不明白不要紧, 学了C语言的指针你就明白了), 所以我们进行的参
  数传递实际上是进行了一次变量赋值, 例如我们调用co(a1,a2), 实际上程序会执行一步:t1=a1,t2=a2这样的操作. 同样因为传
  值传址的原因, VBscrīpt只能返回一个值, 我们先来看看什么叫"返回". 当一个过程调用了另一个过程的时候(比如主程序调用
  了函数), 控制权就到了被调用过程那里, 当这个过程执行完毕以后, 会回到调用它的地方继续执行, 这个就叫做"返回", 返回
  的时候可以带一个值叫做"返回值"(这是"通俗"的理解). 在vbs继承了basic的传统, 返回的时候采用"函数名=返回值"的办法,
  这个"返回值"是指一个表达式(在编程中, 任何东西都是表达式, 比如变量a, 常数0, "Hello",c=1+2等等这都是表达式). 比如
  有一个函数是ht, 则返回的方法是:ht=你要返回的值. 注意:返回以后, 后面的语句将不再执行.
  　　调用一个函数我就不用讲了吧:变量=函数名(参数)
  　　有时候我们并不需要返回什么值, 这个时候我们可以使用一种称之为"子程序"的结构. 子程序或称之为过程与函数的差别
  就在于:1) 没有返回值, 2) 使用sub关键字定义, 3) 通过Call调用.具个例子:
  dim yname
  name=inputbox("请输入你的名字:")
  call who(yname)
  sub who(cname)
  msgbox("你好" & cname)
  msgbox("感谢你阅读我的课程")
  msgbox("这是基础部分的最后一课")
  end sub
  　　你一定看明白了, 很简单的. 退出一个过程和退出一个函数一样:exit sub(函数:exit function).
  　　要注意, 子程序(过程)是比较特殊的一个结构, C等语言是没有这个概念的, C语言中的一切都是函数, 没有返回值的函数
  在C语言中只要使用void修饰符定义就行了.
  　　今天没有什么可讲的了, 基础篇就这么结束了, 目前你已经有了基本的编程概念(面向过程的结构化编程), 可以选择学习
  另外一种语言(比如C或Pascal), 现在的基础会有一定的帮助. 如果你想要继续学习vbs或通过它更详细的了解编程在转型可以
  跟我继续学习, 但因为我的假期结束所以更新的时间可能会比较慢, 请大家原谅．初步计划如下:
  

  查看(48) 评论(0)

• 编程从现在开始

  2008-3-28

      今天开始了学习VB的漫漫旅程，唉，真不知道什么时候可以用到炉火纯青的地步！呵呵，有点着急了

  查看(12) 评论(0)

• 开通空间，其实意味着痛苦的延续

  2008-3-27

       QTP，这个貌似简单的东西，已经打击了我N次，开始以为很简单，其实很难，难在我不会编程，难在我对编程的厌恶与回避。

     本人向来认为自己没有编程的细胞，但是为了工作，偏偏又和他较劲了！其实要学是最简单的东西，却总是找理由回避，这样好像不太好吧！呵呵

     可能从今天开始，这里将是我倒苦水的地方，也希望这能见证我的成长，让自己坚持下去！

  查看(32) 评论(0)

我的主题

• 数组变量+if语句+for循环？？
• 有两个问题请教同志们
• 带有for语句的action 1插入到另个action
• for循环中的问题，请指教
• 帮忙看段脚本保存时总是报这个错误expec
• QTP可以实现由键盘操作的自动化测试吗？
• 复制脚本时找不到对象

我的最新图片

• 

  新年时候

• 

  我自己