超市会员管理项目软件系统测试报告

Р'使用测试用例,测试此模块,并将结果输出到测试结果文件中Р For i = 0 To 4Р 添加操作员.Text1.Text = ""Р 添加操作员.Text2.Text = ""Р 添加操作员.Text3.Text = ""Р 添加操作员.Text1.Text = Testdata(i, 0)Р 添加操作员.Text2.Text = Testdata(i, 1)Р 添加操作员.Text3.Text = Testdata(i, 1)Р If 添加操作员.Label5.Caption = "已存在" ThenР Print #2, Testdata(i, 0) & "," & Testdata(i, 1) & "," & Testdata(i, 2) & "," & "无法添加"Р ElseР mand1_ClickР '查询是否添加成功Р Adodc1.RecordSource = ""Р Adodc1.RecordSource = "select * from 管理员 where 用户名='" + Testdata(i, 0) + "'"Р Adodc1.RefreshР If Adodc1.Recordset.RecordCount > 0 ThenР Print #2, Testdata(i, 0) & "," & Testdata(i, 1) & "," & Testdata(i, 2) & "," & "添加成功"Р ElseР Print #2, Testdata(i, 0) & "," & Testdata(i, 1) & "," & Testdata(i, 2) & "," & "添加失败"Р End IfР End IfР Next iР Close #2 '关闭测试结果文件РEnd SubРPrivate Sub Form_Load()РEnd Sub