Vb 를 사용하여 체질량 지수 측정 프로그램 작성

X>；; VB 에 연결할 수 없습니다. =? X<=? 그리고 나서

개인 하위 명령 1_Click ()

문자 3. Text = round (val (텍스트 2). 텍스트/(텍스트1. 본문) 2), 2)

크기 x

그림 1. Cls

X = Val(Text3) 입니다. 본문)

20<= x 및 x< 인 경우 = 22

그림 1. 인쇄 "최적"

Else if18.5 < = x 와 x< 그럼 20

그림 1. 인쇄 "보통"

엘시프 22<x 와 x< 그럼 24

그림 1. 인쇄 "보통"

ElseIf x< 그럼 18.5

그림 1. 인쇄 "얇음"

ElseIf 24<= x 와 x< 는 28 입니다

그림 1. "초과 중량" 을 인쇄합니다

기타

그림 1. "비만" 을 인쇄합니다

만약 ... 끝날거야

끝단 접합