Mega Code Archive

 

Categories / VB.Net / Data Types

 

String Join Method

Imports System.Collections.Generic Imports System.Linq Module modMain    Public Sub Main()       Dim output As String = String.Join(" ", GetAlphabet().Where(Function(letter) letter >= "M"))       Console.WriteLine(output)                                         End Sub    Private Function GetAlphabet() As List(Of String)       Dim alphabet As New List(Of String)       Dim charValue As Integer = CInt(97)       For ctr As Integer = 0 To 25          alphabet.Add(ChrW(charValue + ctr).ToString())       Next       Return alphabet     End Function End Module