형들 좀 도와주세여 ㅠ

[hiking(nhl1991)]

비베

select case 문으로 짝홀 판별하는거 만드려는데

 Dim number As Integer

   number = Text1.Text

  Select Case Val(Text1.Text)

 

  Case (number Mod 2) = 0

    msgbox "짝수"

   Case Else

    msgbox "홀수"

    

    

     End Select

어떻게 수정해야해영?

[AZ(125.143)]

와나 이건 무슨언어임? 그리고 현재 이 언어상에서 셀렉트 케이스문 사용법이 저게 맞는거야?

[hiking(nhl1991)]

비베영 제가 입문한지 얼마 안되성

[AZ(125.143)]

아 일단 찍어볼게 Selecet Case Val( ~~~~~~~~~) 여기 물결 부분에 짝수인지 홀수인지 판별할 넘버가 들어가야 될것같다. 그러므로 저위치에는 (Text1.Text)%2 (%는 mod와 같은 개념이야 나머지 라는거지) 그리고 Text1.Text 저 속성값을 받았을때 만약 문자열로 인식한다면 숫자로 변경이 필요할꺼야. 이 언어상에서 적용될지 모르겠는데 Integer.parseInt(Text1.Text) 를 Text1.Text 위치에 넣어봐

[AZ(125.143)]

아 보기 어렵겠다 일단 하나하나 나가보자 지금상태로 컴파일하면 결과가 어때

[AZ(125.143)]

에러가 뜨면 에러메세지좀 알려줘

[AZ(125.143)]

그리고 저 언어에서 정상적으로 작동하는 셀렉트 케이스문 보여주면 좋겠어

[AZ(125.143)]

걍 귀찮으면 Select Case Val(Text1.Text)이부분 Text1.Text => number mod 2 로 바꾸고 Case (number Mod 2) = 0 이걸 Case 0 으로 그밑에껄 Case 1로 바꿔봐 위 셀렉트 케이스문이 정상이면 이게될듯.

[hiking(nhl1991)]

와 됐어요!!!!!!! 형 감사해요!

[AZ(125.143)]

기초부터 잘 공부해봐 공부할땐 빡치는데 그래도 해결하는 재미가 생겨 나중에 하려면 늦는다. 우리 중학생 때로 돌아가면 공부 열심히 하고싶잖아. 대학생때도 비베 단계에서 열심히 안하면 나중에 다시 돌아가고싶어 화이팅

[hiking(nhl1991)]

감사해요 형