SoloCodigo

prueba con esto

Try
                Dim sr As System.IO.StreamReader = System.IO.File.OpenText("C:fich.bif")
                Do Until sr.Peek = -1
                    Dim linea As String
                    linea = CStr(sr.ReadLine)

                    If linea.Contains("DeviceUniqueID") Then ' aqui se busca una linea q tenga la palabra DeviceUniqueID
                        'aqui tu código
                    End If
                Loop
                sr.Close()
            Catch ex As Exception

            End Try

saludos