问题 填空题

在窗体上画—个命令按钮,然后编写如下代码:
Private Sub Command1_Click()
Dim M(10) As Integer
For k=1 To 10
M(k) =12-k
Next k
x=6
Msgbox M(2+M(x) )
End Sub
程序运行后,单击命令按钮,消息框显示的是 【13】

答案

参考答案:D

解析:[知识点] 模块/VBA程序设计基础
[评析] M(6) 的值为12-6=6;则有M(2+6) =M(8) 的值为12-8=4。

多项选择题
问答题

病史病人,男性,56岁,农民,小学文化。有高血压病史2年余,曾间断服用“尼群地平”、“卡托普利”等降压药,具体用法用量不详。因突起右侧肢体活动障碍、言语不能2天收入院。起病以来,自觉右侧上、下肢完全不能活动,不能讲话,进食少,饮水有呛咳现象;无头晕、呕吐,大小便及睡眠正常。适龄结婚,有2子,配偶及子女均体健,家族中无类似病史可询。家庭关系融洽,经济状况一般,病人平时性格较急躁,易动怒,病人及家人对所患疾病的有关知识了解较少。
身体评估体温36.6℃,脉搏90次/分,呼吸20次/分,血压150/90mmHg。神志清醒,双侧瞳孔等大等圆,对光反射灵敏,直径3mm;运动性失语,计算无法查,定向力、记忆力尚可,自知力存在,无幻觉、错觉、妄想;右侧上、下肢肌力0级,肌张力增高,左侧上、下肢肌力、肌张力正常;右侧躯体及肢体触、痛觉明显减退,右侧鼻唇沟变浅,伸舌右偏。病前有烟、酒嗜好30余年,日吸烟30余支,三餐必饮酒,每餐约半斤,喜食肥肉,食用动物油。
实验室及其他检查血常规:血红蛋白160g/L,红细胞5.08×1012/L,白细胞8.5×109/L,血小板230×109/L。小便常规(-)、大便常规(-)。肝、肾功能正常,血浆凝血酶原时间、活化部分凝血酶原时间正常,血糖5.45mmol/L,血脂:甘油三酯1.57mmol/L、总胆固醇4.96mmol/L;胸部X线片示:主动脉影宽。心电图示:Ⅱ、Ⅲ、aVF、T波改变。头部CT示:脑内多发性腔隙性脑梗死(部分为陈旧性)。
请分析:

列出护理计划。