Is there a better way to check data in excel spreadsheet?

private Sub SomeSubName(and so on)

 	Dim fp As String = SelectFile()
   	Dim ExcelData As DataTable
        Dim correctColumns = True

            ExcelData = PopulateDataTable(fp)
       
              
            If Not IsDBNull(ExcelData) Then
                Try
                    'loop over each column name and verify data is correct

                      For Each columnName In ExcelData.Columns
                   
                        Select Case columnName.ToString().ToLower()
                            Case "lastname"
                                correctColumns = True
                            Case "firstname"
                                correctColumns = True
                            Case "mi"
                                correctColumns = True
                            Case "suffix"
                                correctColumns = True
                            Case "street"
                                correctColumns = True
                            Case "city"
                                correctColumns = True
                            Case "state"
                                correctColumns = True
                            Case "zip"
                                correctColumns = True
                            Case "phone"
                                correctColumns = True
                            Case "fax"
                                correctColumns = True
                        End Select
                    Next