研究表明，人的身高与遗传有很大关系，其中成年男性的身高预测公式为：身高（cm）=（父亲身高+母亲身高）*1.08/2，女性的身高预测公式为：身高（cm）=（父亲身高*0.923+母亲身高）/2，编辑界面和运行界面分别如下：

（1）应用程序界面设计时，若想要将窗体的标题改为“预测身高”，则应该在窗体中的

Caption

Caption

属性中修改。
（2）运行程序时，在文本框Text1中输入父亲身高，在文本框Text2中输入母亲身高，在文本框Text3中输入性别（输入只限：男或女），单击“预测”按钮Command1，在标签Label4中显示预测身高，程序代码如下：
Dim s As String’s用于存储性别
Dim h1As Single,h2As Single,h As Single,flag as Boolean
h1=Val（Text1．Text）
h2=Val（Text2．Text）
s=   ①
if s=“男“then flag=True else      ②
If flag  Then
h=（h1+h2）*1.08/2
Else
h=（h1*0.923+h2）/2
End if
Label4．caption=“孩子的身高是：“+  ③+“cm“
将程序补充完整：
①横线处应该填入

Text3．text

Text3．text

；
②横线处应该填入

flag=False

flag=False

；
③横线处应该填入

Str（h）

Str（h）