zoukankan      html  css  js  c++  java
  • UFT 基本操作(描述性编程、函数、循环)

    1、描述性编程

    class("描述性属性1:=值","描述性属性2:=值")

    如输入姓名,使用对象属性方法:

     

     

    Dialog("Login").WinEdit("Agent Name:").Set "hhzq"

     使用描述性编程

    Dialog("text:=Login").WinEdit("nativeclass:=Edit","attached text:=Agent Name:").Set "htest"

    2、函数(转自http://blog.csdn.net/xifeijian/article/details/8496304)

    一、Function与Sub概述:
    Sub(子过程): sub是Subroutines的缩写,它的意思是子程序,它是将一段具有某种特定功能的语句区块单独编写成一个独立的程序,给予特定名称 。

    Function(函数):表示每个输入值对应唯一输出值的一种对应关系 ,具备 Sub 的功能。

    二、Function与Sub异同
    相同点:
    1)Sub和Function都是 vbscript 的过程,
    2)可以传递参数,
    3)是业务操作或业务处理的封装,都可以被重复调用。

    不同点:
    1)Sub无返回值,而Function可以有返回值。
    2)调用Sub 和 Function也不同

    三、举例[引用之前网上看的一个例子]:
    大家应该都知道的谈恋爱的过程。有些人只想知道他谈恋爱的过程(Call Sub)。有些人既想知道过程,又要知道最终结果有没有结婚(Call Function)

    假设:谈恋爱这个过程,由给MM打电话、陪MM逛街、给MM送礼物等等动作组成。

    那么,Sub 谈恋爱()和Function 谈恋爱()有什么不同呢?

    1)Sub 谈恋爱
    Sub 谈恋爱()
       给MM打电话
       陪MM逛街
       给MM送礼物
    End Sub

    调用方法:因为Sub没有返回值,只要在代码中: Call 谈恋爱()

    2)Function谈恋爱
    Function 谈恋爱()
       给MM打电话
       陪MM逛街
       给MM送礼物
       If (mm愿意和他结婚) Then
           谈恋爱 = 成功
       Else
           谈恋爱 = 失败
       End If
    End Function

    调用方法:因为Function有返回值,所以可以把函数返回值赋给变量,只要在代码中:result = 谈恋爱()

    3、For  循环(转自http://blog.csdn.net/aeedda/article/details/62034936)

    For循环的格式:

    For 循环变量 = 初值 To 终值 [Step 步长]   step 2 就是i=i+2

    [循环体]

    Next [循环变量]

    注意:

    1) 当步长 > 0 时

    循环执行的条件:循环变量 <= 终值

    2) 当步长 < 0 时

    循环执行的条件:循环变量 >= 终值

    强行退出 For 循环,请使用 Exit For。

    举例1: 单击命令按钮 Command1 后,先后弹出很多消息框,消息内容一开始是 1,最后是 100,每弹出一次,消息内容加 1,也就是 1; 2; 3; ...; 98; 99; 100。

    VB 代码如下:

    Private Sub Command1_Click()

    Dim i As Long

    For i = 1 To 100

    MsgBox i

    Next

    End Sub

    如果使用 For 语句,代码如下:

    Private Sub Form_Load()

    For i = 1 To 100

    MsgBox i, vbInformation      /vbInformation 指显示图标,下同

    Next

    MsgBox "Finished", vbCritical

    End Sub

    举例2,While格式

    如果不用 For 语句,我们可以这样做:

    Private Sub Form_Load()

    Dim i As Long

    i = 1

    While i <= 100 '使用 While 语句

    MsgBox i, vbInformation

    i = i + 1 '这句话千万不能少!否则会造成死循环!!

    Wend   '不能用end while

    MsgBox "Finished", vbCritical

    End Sub


    举例3,Do while

    Private Sub Form_Load()

    Dim i As Long

    i = 1

    Do While i <= 100 '使用 Do While 语句

    MsgBox i, vbInformation

    i = i + 1 '这句话千万不能少!否则会造成死循环!!

    Loop

    MsgBox "Finished", vbCritical

    End Sub

    举例3 do until

    如果连 Do While 都不能用,我们还可以这样做:

    Private Sub Form_Load()

    Dim i As Long

    i = 1

    Do Until i > 100 '使用 Do Until 语句

    MsgBox i, vbInformation

    i = i + 1 '这句话千万不能少!否则会造成死循环!!

    Loop

    MsgBox "Finished", vbCritical

    End Sub

     

     

  • 相关阅读:
    Django目录介绍、路由系统、 ORM表的创建、XSS攻击、分页、 CBV & FBV
    正宗Django框架(Bootstrap 、Django母版、Cookie)
    索引快速查询
    前端学习之jquery
    关于vertical-align和line-height的真知灼见
    js BOM对象 DOM对象
    JS基础学习(一)
    html5实现尖角号
    装饰器
    Win8.1离线安装.Net Framework 3.5
  • 原文地址:https://www.cnblogs.com/HZQHZA/p/7524092.html
Copyright © 2011-2022 走看看