UI 易用性测试以及自动化实现！，2024年最新程序员翻身之路

最新推荐文章于 2024-08-15 19:45:40 发布

2401_84264408

最新推荐文章于 2024-08-15 19:45:40 发布

阅读量590

点赞数 12

分类专栏： 2024年程序员学习文章标签： ui 自动化运维

本文链接：https://blog.csdn.net/2401_84264408/article/details/137782635

版权

2024年程序员学习专栏收录该内容

89 篇文章 0 订阅

订阅专栏

先自我介绍一下，小编浙江大学毕业，去过华为、字节跳动等大厂，目前阿里P7

深知大多数程序员，想要提升技能，往往是自己摸索成长，但自己不成体系的自学效果低效又漫长，而且极易碰到天花板技术停滞不前！

因此收集整理了一份《2024年最新软件测试全套学习资料》，初衷也很简单，就是希望能够帮助到想自学提升又不知道该从何学起的朋友。

既有适合小白学习的零基础资料，也有适合3年以上经验的小伙伴深入学习提升的进阶课程，涵盖了95%以上软件测试知识点，真正体系化！

由于文件比较多，这里只是将部分目录截图出来，全套包含大厂面经、学习笔记、源码讲义、实战项目、大纲路线、讲解视频，并且后续会持续更新

如果你需要这些资料，可以添加V获取：vip1024b （备注软件测试）

正文

(4)按键、镜片、LCD、LED、显示屏、摄像头、配合类测试。

(5)包装、附件等。

二、易用性测试的自动化实现

易用性测试主要是针对对象的一些属性进行测试，但如果每个测试版本都去验证对象的属性，效率显然比较低，但是如果不验证，又担心开发工程师修改了对象的属性。而借助自动化测试工具帮助进行易用性测试，显然可以提高测试的效率，但不是所有的属性都可以通过自动化测试来实现，在测试过程中可以有选择地对对象的属性进行自动化测试。

易用性自动化测试实现的步骤如下：

(1)获取实际测试过程中对象的相关属性。

(2)将实际的对象属性与预期对象属性进行比较。

(3)如果不同，测试结果标为 FAIL;如果相同，则结果标为 PASS。

易用性测试内容见表 15-3

在易用性测试表中，列出需要测试的对象名、对象的属性以及各属性的预期结果，在测试过程中，获取实际运行时对象的属性值，并将它填写到表格中。之后再比较预期结果与实际结果的值是否相同，如果相同，则在结果列中标为PASS(字体颜色为绿色)，否则标为 FAIL(字体颜色为红色)。

现在我也找了很多测试的朋友，做了一个分享技术的交流群，共享了很多我们收集的技术文档和视频教程。
如果你不想再体验自学时找不到资源，没人解答问题，坚持几天便放弃的感受
可以加入我们一起交流。而且还有很多在自动化，性能，安全，测试开发等等方面有一定建树的技术大牛
分享他们的经验，还会分享很多直播讲座和技术沙龙
可以免费学习！划重点！开源的！！！
qq群号：691998057【暗号：csdn999】

【实例】使用自动化测试工具 QuickTest Professional 测试图 15-20 中 OK 按钮的属性。

图 15-20 易用性测试对象

实现的代码如下：

'———————————————————————————————————
’ 函数名：CompareText
’
’ 目的：比较预期结果和实际结果单元格的值是否相同
’
’ Parameters：
’ sheetname：待比较的 sheet
’ expectColumn：预期结果列
’ actualColumn：实际结果列
’ startRow：比较的开始行
’ numberOfRows：共需要比较多少行
’ trimed：单元格中的值是否包含空格符
’ Date: 2011-11-27
'———————————————————————————————————
Function CompareText(sheetname, expectColumn, actualColumn, startRow,
numberOfRows, trimed)
Dim returnVal
Dim cell
returnVal = True
'判断 sheet 对象是否为 nothing
If sheetname Is nothing Then
CompareText = False
Exit Function
End If
'循环读取单元格中的值
For r = startRow to (startRow + (numberOfRows - 1))
Value1 = sheetname.Cells(r, expectColumn)
Value2 = sheetname.Cells(r, actualColumn)
'空格符去掉后再进行比较
If trimed Then
Value1 = Trim(Value1)
Value2 = Trim(Value2)
End If
'比较两个数据是否相等，如果相等将结果标为 PASS 并将字体置为绿色，否则将结果标为 FAIL 并将字体置为红色
Set cell = sheetname.Cells(r,actualColumn+1)
If Value1 <> Value2 Then
sheetname.Cells(r, actualColumn+1).value = “FAIL”
cell.Font.Color = vbRed
returnVal = False
else
sheetname.Cells(r, actualColumn+1).value = “PASS”
cell.Font.Color = vbGreen
returnVal = True
End If
Next
CompareText = returnVal
End Function
Set ExcelApp = CreateObject(“Excel.Application”)
Set ExcelSheet = CreateObject(“Excel.Sheet”)
Set myExcelBook1= ExcelApp.WorkBooks.Open(“c:\1.xls”)
Set myExcelSheet1= myExcelBook1.WorkSheets(“Sheet1”)
Dialog(“Login”).WinEdit(“Agent Name:”).Set “test”
Dialog(“Login”).WinEdit(“Password:”).SetSecure
“4ed2314da546f1e8280d3586032611a53dfbed13”
myExcelSheet1.Cells(2,4).value =
Dialog(“Login”).WinButton(“OK”).GetROProperty(“text”)