var numbers = new List<int>() { 4, 6, 7, 8, 34, 33, 11};

Dim numbers = New List(Of Integer) (New Integer() {4, 6, 7, 8, 34, 33, 11})

bool isTrue = false;
foreach (var i in numbers)
{
if (i == 0)
{
          isTrue = true;
}
}

Dim isTrue As Boolean = False
For Each i In numbers
If i = 0 Then
          isTrue = True
End If
Next i

var numbers = new List<int>() { 4, 6, 7, 8, 34, 33, 11};
var isTrue = numbers.TrueForAll(o => o > 0);

Dim numbers = New List(Of Integer) (New Integer() {4, 6, 7, 8, 34, 33, 11})
Dim isTrue = numbers.TrueForAll(Function(o) o > 0)

static void Main(string[] args)
{
    IEnumerable<string> newList = null;

    List<string> strList = new List<string>()
    {
        "Jane", "Bandy", "Ram", "Fiddo", "Carol"
    };

    newList = strList.OrderBy(x => x.Length)
                    .ThenByDescending(x => x);

    foreach (var str in newList)
        Console.WriteLine(str);
    Console.ReadLine();
}

Shared Sub Main(ByVal args() As String)
    Dim newList As IEnumerable(Of String) = Nothing

    Dim strList As New List(Of String)() From _

{"Jane", "Bandy", "Ram", "Fiddo", "Carol"}

    newList = strList.OrderBy(Function(x) x.Length)_

.ThenByDescending(Function(x) x)

    For Each str In newList
        Console.WriteLine(str)
    Next str
    Console.ReadLine()
End Sub

static void Main(string[] args)
{
    string[] arr = {"One", "Two", "Three",
                   "Four", "Five", "Six",
                   "Seven", "Eight"};
    var result = from x in arr
                     .Skip<string>(2)
                     .Take<string>(3)
                 select x;

    foreach (string str in result)
    {
        Console.WriteLine("{0}", str);
    }

    Console.ReadLine();
}

Sub Main(ByVal args() As String)
    Dim arr() As String = {"One", "Two", "Three", "Four", "Five",
"Six", "Seven", "Eight"}
    Dim result = From x In arr.Skip(Of String)(2).Take(Of String)(3)
                 Select x

    For Each str As String In result
        Console.WriteLine("{0}", str)
    Next str

    Console.ReadLine()
End Sub