Mega Code Archive

 

Categories / VB.Net / Language Basics

 

Select range

Imports System public class MainClass     Shared Sub Main()        Dim target As String = "M"        Select Case target           Case "A" To "L"              Console.WriteLine("Alpha To Lambda executed")           Case "L" To "Z"              Console.WriteLine("Lambda To Zeta executed")           Case Else              Console.WriteLine("Else executed")        End Select     End Sub End Class