답지에는
If Val( txt토익) > 100 Or Val( txt컴퓨터) > 100 Or Val( txt전공2)>100 Then
MsgBox "점수는 0~100 사이의 값으로 입력하세요."
else
입력행 = [b2].Row + [b2].CurrentRegion.Rows.Count
Cells(입력행, 2) = txt이름
Cells(입력행, 3) = Format(txt학번, ">&&&&&&")
Cells(입력행, 4) = cmb학과명
Cells(입력행, 5) = Val(txt토익)
Cells(입력행, 6) = Val(txt컴퓨터)
Cells(입력행, 7) = Val(txt전공2)
cmb학과명.Locked = True
End If
이렇게 나와있는데 밑에처럼 바꿔서 써도 될까요?
If Val( txt토익) <= 100 Or Val( txt컴퓨터) <= 100 Or Val( txt전공2)<= 100 Then
입력행 = [b2].Row + [b2].CurrentRegion.Rows.Count
Cells(입력행, 2) = txt이름
Cells(입력행, 3) = Format(txt학번, ">&&&&&&")
Cells(입력행, 4) = cmb학과명
Cells(입력행, 5) = Val(txt토익)
Cells(입력행, 6) = Val(txt컴퓨터)
Cells(입력행, 7) = Val(txt전공2)
cmb학과명.Locked = True
Else
MsgBox "점수는 0~100 사이의 값으로 입력하세요."
End If
안녕하세요.
TOEIC 도 100 이하의 수치를 데이터로 입력되도록 지시하였으므로
'(txt토익) > 100'으로 입력하시면 안 됩니다. 100이하의 수치이므로 'txt토익<=100'이여야 합니다.
오늘도 좋은 하루 보내세요.
-
*2018-08-06 15:45:06
안녕하세요.
TOEIC 도 100 이하의 수치를 데이터로 입력되도록 지시하였으므로
'(txt토익) > 100'으로 입력하시면 안 됩니다. 100이하의 수치이므로 'txt토익<=100'이여야 합니다.
오늘도 좋은 하루 보내세요.