Select Case

<%@Language=VBScript%>
<%Option Explicit %>
<HTML>
<HEAD>
<TITLE>Select Case Statement</TITLE>
</HEAD>
<BODY>

<%
  Dim s,s1,s2
  s1 = 50
  s2 = 10
  s = "Mul"

  Select Case s

    Case "Add"
      Response.Write(s1 + s2)

    Case "Sub"
      Response.Write(s1 - s2)

    Case "Mul"
      Response.Write(s1 * s2)

    Case "Div"
      Response.Write(s1 / s2)
  End Select
%>

</BODY>
</HTML>
Select Case

RELATED POSTS
