VB人事管理系统论文Private Sub Form_Load()
Dim fil As Integer
Dim textline As String
If Dir(App.Path + "\readme.txt") <> "" Then
      fil = FreeFile
    Open App.Path + "\readme.txt" For Input As #fil
            Do While Not EOF(fil)
            Line Input #fil, textline            
Text1.Text = Text1.Text + textline + Chr$(13) + Chr$(10)
            Loop
           Close #fil
Else
    MsgBox "找不到指定文件"
    Exit Sub
End If
End Sub
第七章  测试与运行记录
7．1 测试目的
在系统开发过程中存在许多复杂的问题，为了保证系统在投入运行中；保证软件的质量和运行的安全行，测试过程是必不可少的，同时也是关键的。测试是为了发现软件在运行过程中所出现的问题，并在出现问题时能够及时的做出相应的修改。测试的目标是保证系统在投入运行中的安全性和稳定性。
7．2 测试方法
测试方法是测试过程中至关重要的环节，采用的测试方法不同所产生的效果和所用的测试经费也是不同的。一个好的测试方法能够提高测试的效率，缩短测试的时间，也能够减少测试的经费。
7．3 测试记录与运行结果
7．3．1管理员登录测试：
输入密码错误：
 
图7.1登录测试界面
密码错误显示结果密码错误请重新输入：
 
图7.2密码错误显示界面
7．3．2密码修改测试
修改密码错误：
 
图7.3密码修改测试界面
修改密码错误显示两次输入不一致：
 
图7.4密码修改错误显示界面
7．3．3信息添加测试
未输入教师信息： 
图7.5信息添加测试界面
输入教师信息点击更新后显示结果如下：

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] 下一页