Mega Code Archive

 

Categories / VB.Net Tutorial / Statements

 

Select Case statement with Integer and exact value

Option Strict On  Imports System  Module Module1     Sub Main( )        Dim targetInteger As Integer = 15        Select Case targetInteger           Case 5              Console.WriteLine("5")           Case 10              Console.WriteLine("10")           Case 15              Console.WriteLine("15!")           Case Else              Console.WriteLine("Value not found")        End Select     End Sub 'Main  End Module 15!