VB select case 体型测试 代码

Private Sub Command1_Click()

End

End Sub

Private Sub Form_Load()

Form1.Caption = "体型测试"

End Sub

Private Sub Text1_Change(Index As Integer)

Select Case Index

Case 0

体重 = Text1(Index).Text

Case 1

身高 = Text1(Index).Text

End Select

If 身高 = "" Then P = 0 Else P = 体重 / 身高 * 105

Select Case P

Case Is <1

Label4.Caption = "太瘦"

Case P >= 1 And P <1.15

Label4.Caption = "有点瘦"

Case P >= 1.15 And P <1.45

Label4.Caption = "标准"

Case P >= 1.45 And P <1.6

Label4.Caption = "有点胖"

Case Is >= 1.6

Label4.Caption = "太胖"

End Select

End Sub

控件和界面你自己搞吧 ，text1是文本框数组，0——体重，1——身高

上、下身比例：以肚脐为界，上下身比例应为5比8，符合“黄金分割”定律。

胸围：由腋下沿胸部的上方最丰满处测量胸围，应为身高的一半。

腰围：在正常情况下，量腰的最细部位。腰围较胸围小20厘米。

髋围：在体前耻骨平行于臀部最大部位。髋围较胸围大4厘米。

大腿围：在大腿的最上部位，臀折线下。大腿围较腰围小10厘米。

小腿围：在小腿最丰满处。小腿围较大腿围小20厘米。

足颈围：在足颈的最细部位。足颈围较小腿围小10厘米。

上臂围：在肩关节与肘关节之间的中部。上臂围等于大腿围的一半。

颈围：在颈的中部最细处。颈围与小腿围相等。

肩宽：两肩峰之间的距离。肩宽等于胸围的一半减4厘米。

骨骼美在于匀称、适度。即站立时头颈、躯干和脚的纵轴在同一垂直线上；肩稍宽，头、躯干、四肢的比例以及头、颈、胸的连接适度。肌肉美在于富有d性和协调。过胖过瘦或肩、臀、胸部的细小无力，以及由于某种原因造成的身体某部分肌肉的过于瘦弱或过于发达，都不能称为肌肉美。肤色美在于细腻、光泽、柔韧、摸起来有天鹅绒之感，看上去为浅玫瑰色的最佳。

女性人体美学没有一个统一的标准，根据民族文化的不同和时代的不同有不同的标准。17世纪认为美女应具有以下标准：1、从侧面看鼻子应微上翘而不鹰勾；2、上唇较下唇稍薄且左侧有一酒窝。维多利亚时代认为女人丰满且臀部大才美，并且将颈部的皱褶称之为“维纳斯项链”。

当代美的标准则是体形苗条、面部五官比例合适。

1.黄金分割定理：是由古希腊毕达哥拉斯学派所发现，它侧重于从数学关系去探讨美的规律，并认为美就是和谐与比例，按照这种比例关系就可以组成美的图案，实际上黄金分割定理是一种数字的比例关系，即将一条线分成两部分，较长的一段与较短的一段之此等于全长与较长的一段之比，它们的比例大约是1.618:1或近似等于8:6的关系. 在人体上也存在着黄金分割的比例关系.尤其是在理想的人体，往往是以肚脐为分割下半部与上半部的比例关系，恰是8：5的关系；头面部也存在着这种关系，即从发际到颏和从颏到眼外眦，从颏到眼外眦和从颏到鼻翼，从颏到口裂和从颏到鼻翼，面宽度与眼外眦间距，口裂和鼻底宽之间等等.

2.理想的人体比例：对人体进行美学观察，医学界摧崇的是人体比例学说。所谓比例学说，就是用数学方法来表示标准人体； 并根据一定的基准进行比较，以同一人体的某一部位为基准，制定他于人体的比例关系的方法称为同身方法. Leonardo认为八头身（即身长是头高的8倍）的身材，且以两侧髂骨最高点连线将身体分为上下相等的两段才是健康男女青年理想的身材.

3.颜面五官部位的分布比例规律：

（1）从发际到下颏之间的距离应等于3个耳朵或鼻子的高度，即从发际至眉毛和从下颏至鼻子之间的距离相等且与耳的高度相等.

（2）早在5世纪. Leonardo De Vince就把颅面部横分成二等分，上半部是从颅顶到鼻根部，下半部从鼻根部到下颏部，这两部分的高度应该相等，同时他还认为两眼之间的距离为一个眼的宽度，鼻翼的两外侧缘不超过两内眦的垂直线。口角的两侧缘恰好在两角膜内侧缘的垂直线上，面部正面可纵行分为四等分，即分别从面部中线和其左右通过虹膜外侧缘及面部外侧角做垂线纵向分割成四个相等的部分.也有人将面部做五眼分法，即在眼睛水平线上，左右耳孔之间的距离正好等于五个眼的宽度.

（3）眉毛的外侧缘向上外微微翘起才显得年轻、有朝气，否则就毫无生气.在平视时上睑缘与瞳孔上缘齐平，下脸缘则与角膜下缘齐平，但是对于老年人则不适宜.

4.测角学说、目前常用以鼻尖点和颏下点的直线为基准，这条线可以用来观察嘴唇的突出度，井以此来评价美与丑，鼻尖-嘴唇-颏下点基本为一直线时，被认为是美人的标志之一。