C# と VB.NET の質問掲示板

■No87717 (opp さん) に返信

Sub Main()
    Dim lines = {
        "a,b,c",
        "a,b,c,c",
        "a,b,c,c,c"
        }

    For Each line In lines
        Dim values = line.Split(","c).SkipWhile(Function(i) {"a", "b"}.Contains(i))
        Diagnostics.Debug.WriteLine(String.Join(",", values))
    Next
End Sub

こういうこと？

■No87723 (Opp さん) に返信
> ■No87722 (774RR さん) に返信
> 
> 詳しくありがとうございます
> 
> ab,bc,cd,de → cd,de
> xxx,yyy,zzz → zzz
> 
> のように　2以降だけ取得したいので
> ・その行は抽出しない→入力１０行に対して出力３行とかを容認する　です
> 無い場合は、何も無いという風にしたいので（後々入ってくるので・・）
> 

        Dim sample = {"a,b,c",
                      "a,b,c,c",
                      "a",
                      "x,y,c",
                      "z,b,d"}

        Dim result = (From line In sample
                      Select values = line.Split(","c)
                      Where values.Length > 2
                      Select values.Skip(2).ToArray).ToArray

こんな感じの処理でしょうか？