다시질문

Private Sub Command1_Click() Dim 국어 As Integer
Dim 수학 As Integer
Dim 사회 As Integer
Dim 과학 As Integer
Dim 영어 As Integer
Dim 총점 As Integer
Dim 평균 As Double

국어 = Text1.Text
수학 = Text2.Text
사회 = Text3.Text
과학 = Text4.Text
영어 = Text5.Text
총점 = 국어 + 수학 + 사회 + 과학 + 영어
평균 = 총점 / 5

Label6.Caption = 과목들의 총 점수는 & 총합 & 점 입니다.
Label7.Caption = 과목들의 평균점수는 & 평균 & 점 입니다.

End Sub디버그 누르면이렇게 뜹니다 ㅜㅜ

댓글 1

  • 유리 2026.09.17

    그냥 텍스트이름을 국어, 수학으로 하시면..?

비주얼베이직 다른 글

목록