[vb.net] Select Case > vb.net

본문 바로가기

vb.net

[기타] [vb.net] Select Case

회원사진
하나를하더라도최선을
2019-10-25 12:12 10,821 0

본문



    Select Case aa

        Case 1 To 1.49

            MsgBox(1)

        Case 1.5 To 2

            MsgBox(2)

        Case Else

            MsgBox("was lower than 1 or higher than 2 or between 1.49 and 1.5")

    End Select

this(below) would go into case else

   Dim aa As Double = 1.499

this(below) will go into case 1 to 1.49

   Dim aa As Double = 1.4

this(below) will go into case 1.5 to 2

   Dim aa As Double = 1.78

other way of doing it: From here

    Select Case value

        Case Is <= 49.99

            Debug.WriteLine("first group")

        Case Is <= 99.99

            Debug.WriteLine("second group")

        Case Is <= 199.99

            Debug.WriteLine("third group")

        Case Else

            Debug.WriteLine("fourth group")

    End Select

and maybe this too:

    Select Case true

        Case (value >= 0 andalso value <= 49.99)

            Debug.WriteLine("first group")

        Case (value >= 50 andalso value <= 99.99)

            Debug.WriteLine("second group")

        Case (value >= 100 andalso value <= 199.99)

            Debug.WriteLine("third group")

        Case Else

            Debug.WriteLine("fourth group")

    End Select

댓글목록0

등록된 댓글이 없습니다.
게시판 전체검색