Dize bul, kısmi yok say ve listeye ekle

Question

Çok sayıda satır içeren bir sekme ayrılmış dosyam var. Kısmi örneklerini içeren satırları vermeden bir dizenin tam bir örneğini içeren bu dosyadaki ilk ve son satırları çıkarmaya çalışıyorum.

15131 4845154 78465500 100 1784874 <-- should be found 
10048 7846545 78464989 875 9897845 <-- should not be found 
74654 4784848 99135456 100 7465464 <-- should be found 
10078 8786468 84686446 875 8784845 <-- should not be found 

Ben en iyi düşündüm: Örneğin, ben bir sekme ayrılmış "100" ve geri dönen sadece bu satırları değil, 100584 5416100 içerenler vb Dosyam gibi görünebilir içeren dosyadaki tüm satırları arıyorum yolu listesini doldurmak için olacaktır:

Dim myList As List(Of String) 
myList = IO.File.ReadLines(SomeFile).OfType(Of String).Where(Function(s) s.Contains("100")).ToList 

Sonra myList.first ve myList.last ilgili çizgilerini döndürür. Bu iyi çalışır, ancak yukarıdaki kod da kısmi örneklerini de içeren ilk ve son satırları verir. Bu nasıl çözülebilir? Kocaman teşekkürler.

Answer 1

Contains("100") numarasını değiştirmek için Contains(" 100 ")'u okuyun. Numara etrafındaki boşlukları not edin.