어떻게 정수를 두 개의 개별 변수로 분리합니까?

Question

내 코드에 문제가 발생했습니다. 나는 사용자에게 '일 수'를 입력하도록 요청하는 프로그램을 만들었고, 그 다음 주와 남은 날짜로 구분됩니다. 여기

(나는 아직 이미지를 게시 할 수있는 권한을 부여되지 않았기 때문에 링크를 클릭하시기 바랍니다) 내가 지금까지 작성한 코드 :

일부 지침 감상 할 수있다.

Answer 1

if가 잘못되어 일 수> = 7 일을 다시 계산해야하는 경우.

Dim weeks As Integer 
    Dim days As Integer 
    '.... 
    weeks = days \ 7 
    If days >= 7 Then 
     days = days - (weeks * 7) 
     '... 
    End If 

Answer 2

if 문이 올바르지 않습니다. 나는 사람들이 관심을 가질 경우를 대비해 똑같은 일을 성취 할 수있는 또 다른 방법을 추가하고있다.

Dim weeks As Integer = 0 
Dim days As Integer = 0 
'... 
If days >= 7 Then 
    weeks = days/7 
    days = days % 7 
    '... 
End If