[说明]
在一些应用场合中，需要对用户的输入数据进行检查监控。以下VisualBasic程序实现了对新添加到 List列表的内容进行监控，拒绝向List列表添加重复信息。例如，在List列表中存在元素“a01001；a01002”，如果用户输入数据为“aOl001”或“a01002”，系统则弹出提示信息，拒绝将新数据加入List列表；如果用户输入的数据不同与List列表中的任何一个元素，则作为新元素加入List中。VisualBasic界面显示如图11-5所示。根据程序功能说明，完成程序代码。

[代码1]
Begin VB.Form Form1
Caption=“List列表拒绝添加重复信息”
//...窗体描述(略)
Begin VB.CommandButton Command2
Caption=“退出”
//...窗体描述(略)
End
Begin VB.CommandButton ommand1
Caption=“添加”
//...窗体描述(略)
End
Begin VB.TextBox Text1
//...窗体描述(略)
End
Begin VB.ListBox List1
Height=1860
ItemData="Form1.frx": 0000
Left=1020
List="Form1.frx": 0002
TabIndex=0
Top=525
Width=2580
End
Begin VB.Label Labell
BackStyle=0’Transparent
Caption="请输入编号"
//...窗体描述(略)
End
End
[代码2]
Attribute VB_Name="Form1"
Attribute VB_GlobalNameSpace=False
Attribute VB_Creatable=False
Attribute VB_PredeclaredId=True
Attribute VB_Exposed=False
Private Sub Form_Load ( )
Listl.AddItem"a01001"
Listl.AddItem"a01002"
End Sub
Private Sub Command1 Click ( )
Dim Myval As Long
For i=0 To (1)
(2)
If (3) Then
MsgBox"系统不允许重复输入，请重新输入"
Exit Sub
End If
(4)
(5)
End Sub

根据汉语提示完成句子。

1. —你感觉如何？  

    —我觉得很累。 

    —______ ______ you ______ now? 

    —I'm feeling very tired .

2. —你妹妹怎么了？   

    —她压力很大。

    —______ the ______ with your sister?  

    —She is ______ ______.

3. 如果你累了，就应该躺下休息。

    If you ______ ______, you should ______ ______ and _____.

4. 早睡早起是好习惯。         

    ______ a good habit to______ ______ ______ early and ______ ______ early.

5. 不要太紧张，这会让你生病的。      

    Don't ______ ______ ______. It will ______ you ______.

6. 对我们来说，饮食均衡是重要的。      

    It's ______ for us to ______ a ______ ______.

7. 传统中医认为我们需要阴阳平衡。

    ______ ______ ______ believe we need a ______ of yin and yang .

8. 现在中药在许多西方国家是受欢迎的。

    ______ ______ is now popular in many ______ ______.

9. 为了保持健康要多吃蔬菜和水果。

    Eat more vegetables and fruit to ______ ______.

10. 听到你感觉不舒服我很遗憾。

    I'm ______ to ______ that you are not ______ well.