第11题: [填空题]设有命令按钮Command1的单击事件过程,代码如下,请填空。
Private Sub Command1_Click( )
Dim a(30) As Integer
For i=1 To 30
a(i) =i
Next
For Each arrItem______a
If arrItem Mod 7=0 Then Print arrItem;
If arrItem>90 Then Exit For
Next
End Sub 参考答案:In 答案解析:[解析] 本题考查了For Each…Next语句。与For…Next类似,但For Each…Next专门用于数组或对象“集合”,其一般格式为:
For Each 成员 In 数组
循环体
第15题: [单项选择]胃、十二指肠溃疡大出血的原因() A. 胃酸作用使创面渗血不易凝固 B. 胃窦部黏膜糜烂渗血 C. 反复溃疡使创面微血管渗出 D. 溃疡侵犯胰腺引起大出血 E. 溃疡基底动脉被腐蚀破裂 参考答案:E 答案解析:溃疡大出血是溃疡基底血管被腐蚀破裂所致,大多数为动脉出血。
第16题: [单项选择]两周患病率的计算公式是 A. 调查前两周内患病人(次)数/调查人数×100% B. 调查前两周内患病人(次)数/需住院患者数×100% C. 调查前两周内患病人(次)数/调查患者数×100% D. 调查前两周内患病人(次)数/需就诊患者数×100% E. 调查前两周内患病人(次)数/已住院患者数×100% 参考答案:A
第34题: [单项选择]关于我国土地资源特点的论述,正确的是______。 A. 各种类型的土地资源并不完全大面积分布 B. 各种类型的土地资源间的比例适当 C. 除耕地外,其他类型土地的人均占有量均居世界前列 D. 土地自然生产力的地区差异显著 参考答案:D 答案解析:[解析] 土地自然生产力的地区差异显著。
第35题: [单项选择]脾破裂 A. 腹痛伴发热寒战、黄疸 B. 腹痛伴反酸、嗳气 C. 腹痛伴呕吐 D. 腹痛伴休克、贫血 E. 腹痛伴腹泻 参考答案:D 答案解析:脾破裂可出现腹痛伴休克、贫血等临床表现。