Change select case to if\else[Answered] RSS

• • Reply
  afaour

  None

  0 Points

  2 Posts

  Change select case to if\else

  Mar 08, 2015 01:06 AM|afaour|LINK

  hello,

  can anyone help me in changing the following code from select case to if/else:

  Select Case J

    Case Is >=5

              Select Case false

                          Case x=1

                                                              s = "Test 1"

                          case else

                                                              s = "Test 2"

              End select

              Case Is > 2, Is < 10, 13, 14

                  s = "Test 3"

              Case Else

                  s = "Test 4"

          End Select
  

  selectcasetoifelse

• • Reply
  rezaxp

  Participant

  1292 Points

  408 Posts

  Re: Change select case to if\else

  Mar 08, 2015 01:30 AM|rezaxp|LINK

  if (j>=5)
  {
  	if (x==1)
  	{
  		s = "Test 1";
  	}
  	else
  	{
  		s = "Test 2";
  	}
  }
  else if (j > 2)
  
  {
  	s = "Test 3";
  }
  else
  {
   	s = "Test 4";
  }

  
  
  

  selectcasetoifelse

  Please don't forget Mark as Answered if you got your answer
  
  Life would be so much easier if we could just look at the source code.
  Tweet
• • Reply
  Rion William...

  All-Star

  114593 Points

  18503 Posts

  MVP

  Re: Change select case to if\else

  Mar 08, 2015 08:40 AM|Rion Williams|LINK

  Your current case statement seems a bit strange, but it might look something like this :

  ' Define your return value (s) '
  Dim s = ""
  
  ' Run through your logic '
  If J >= 5 Then
      If x = 1 Then
         s = "Test 1"
      Else
         s = "Test 2"
      End If 
  Else If (J > 2) OrElse (J < 10) OrElse (J = 13) OrElse (J = 14) Then
      s = "Test 3"
  Else 
      s = "Test 4"
  End If
  

  selectcasetoifelse

  Blog | Twitter | Stack Overflow | LinkedIn
• • Reply
  afaour

  None

  0 Points

  2 Posts

  Re: Change select case to if\else

  Mar 08, 2015 08:46 AM|afaour|LINK

  thank you very much Rion

  A+

  selectcasetoifelse

• • Reply
  rezaxp

  Participant

  1292 Points

  408 Posts

  Re: Change select case to if\else

  Mar 08, 2015 08:46 PM|rezaxp|LINK

   OrElse (J < 10) OrElse (J = 13) OrElse (J = 14) never happens as the first if statement is J >= 5 so it is redundant, isn't it?

  selectcasetoifelse

  Please don't forget Mark as Answered if you got your answer
  
  Life would be so much easier if we could just look at the source code.
  Tweet