Two errors left and Ill be done with this project! Any help would be appreciate!!

Team Tools Test Analyze Window Help Any CPU Debug Employee Data 1.vb Employee Data 1.vb [Design] Employee Data 2vb* X AddForm.vb* Employee Data Final Label2 Private Sub btnClear_Click(sender As Object, e As EventArgs) Handles btnclear txtFirstName . Text "" txtMiddleName. Text" txtLastName. Text txtEmpNumber.Text" txtDept.Text txtTelephone. Text" txt Extension . Text . "" txtEmail.Text End Sub Private Sub btnNextRecord Click(sender As Object, e As EventArgs) Handles btr setData() If Not g strFilename String.Empty Then If inputFile.Peek -1 Then ReadNextRecord) Else MessageBox.Show("No Records") End If End If End Sub Private Sub btnExit_Click(sender As Object, e As EventArgs) Handles btnExit. Me.Close) End Sub 100 % Error List - Current Document (Employee Data 2.vb) . Il*20f 6 Errors Mi owarnings 100Messages Ihl Build-intellisense Current Document Code Description 3 BC30451 'inputFile' is not declared. It may be inaccessible due to its protection level. BC30451 'ReadNextRecord is not declared. It may be inaccessible due to its protection level. Ln 8 Col 5