Imports System Imports System.IO Imports System.Text
Public Class Test Public Shared Sub Main()
For Each line As String In File.ReadLines("d:\data\test.txt") If line.Contains("test") And line.Contains("2006") Then
Console.WriteLine(line) End If
Next line End Sub End Class