연령 기반 "사례 선택"

Question

그래서 사용자가 입력 한 연령을 읽고 그들이받는 가격을 결정하는 버튼을 코딩하려고합니다. 아래는 행운을 빌어 이것을 시도한 방법입니다.

Private Sub btnSelect_Click(sender As Object, e As EventArgs) Handles btnSelect.Click 
    Dim txtage As String 
    txtage = lblPrice.Text.ToUpper 
    Select Case txtage 
     Case CStr(0) To CStr(3) 
      lblPrice.Text = "0" 
     Case CStr(4) To CStr(63) 
      lblPrice.Text = "9" 

    End Select 

End Sub 

나는이 명시 적 옵션에서 옵션 엄격한에서 옵션 완전 추론 끄기, I가 없거나 잘못 여기서 뭐하는 거지

? 제발 고마워.

Answer 1

다음 올바른 위치에서 값을 가져오고 문자열에서 읽은 후 Integer.TryParse으로 일부 코드 보호를 사용하십시오.

Private Sub btnSelect_Click(sender As Object, e As EventArgs) Handles btnSelect.Click 
    Dim age As Integer 
    If Integer.TryParse(txtage.Text, age) Then 
    Select Case age 
     Case 0 To 3 
     lblPrice.Text = "0" 
     Case 4 To 63 
     lblPrice.Text = "9" 
    End Select 
    End If 
End Sub