VB 계산 장방형 의 둘레 와 면적 프로 그래 밍 장방형 의 둘레 와 면적 프로 그래 밍

VB 계산 장방형 의 둘레 와 면적 프로 그래 밍 장방형 의 둘레 와 면적 프로 그래 밍

프로 그래 밍 만 하면 돼 요?
Private Sub Command1_Click()
If Val(Text1.Text) > 0 And Val(Text2.Text) > 0 Then
Label1.Caption="직사각형 의 면적 은:"&Val(Text 1.Text)*Val(Text 2.Text)
Label2.Caption="직사각형 의 둘레 는:"&2*(Val(Text 1.Text)+Val(Text 2.Text))
Else
MsgBox"입력 한 데이터 가 규범 에 맞지 않 습 니 다.다시 입력 하 십시오!","힌트
End If
End Sub