问题 单项选择题

阅读下面的程序; Function Func(x As Integer,y As Integer)As IntegerDim n As IntegerDo While n < = 4 x=x + y n = n + 1LoopFunc=x End Function Private Sub Command1_Click()Dim x As Integet, y As IntegerDim n As Integer,z As Integerx=1y=1For n = 1 To 6 z=Func(x,y)Next nPrint z End Sub 程序运行后,单击命令按钮,输出的结果为.

A.16

B.21

C.26

D.31

答案

参考答案:D

解析:

[分析]: 过程Func有两个参数,使用的是引用方式,参数和返回值均为整型,在命令按钮事件过程的For循环中调用Func过程,共循环6次,每次循环调用一次。两个过程中使用的变量 (包括参数)基本相同,但由于是局部变量,不会发生冲突。无论在事件过程还是通用过程中, y的值始终保持不变,总等于1。在Func过程中, Do Loop循环共执行5次,通过变量n控制(从 0~4),每次都执行x=x+1,因此,每调用一次 Func过程,都使得x=x+5,并将返回值赋给事件过程中的变量z。6次调用中,循环变量n的计算过程为:1、2、3、4、5、6:返回值z的结果为:6、11、16、21、26、31。

单项选择题

案例七:一般资料:求助者,女性,42 岁,自由职业者。案例介绍:求助者家庭条件优越,自己在家照看两个女儿。求助者少年时期学过钢琴,曾经梦想要成为钢琴家,后因故中断。大女儿4 岁的时候,就被她安排学琴,后来考入音乐学院,求助者很欣慰。她也想让小女儿学琴,可小女儿却不顺从,就是不想学音乐。求助者非常伤心,她觉得小女儿不明白她的苦心。为此很苦恼,前来咨询。下面是心理咨询师与求助者的一段咨询谈话:求助者:我要她学音乐,跟她姐姐一样,也是为她好啊!心理咨询师:世界上没有两个人是一样的,两个女儿也不会一样。……求助者:我是她妈妈,她为什么就不听我的话呢?心理咨询师:您小时候,妈妈说的话您都听吗?求助者:有时候听,有时候不听。心理咨询师:这就对了,不可能别人说的所有话我们都需要照办。求助者:那我所做的努力不就白费了吗?心理咨询师:问题的关键不在于努力是否白费,而在于您要求小女儿必须听您的话去学琴。实际上,学不学音乐都可以成才,您却坚持她一定要学音乐,您的烦恼就来自于此求助者:如果她将来学习不好,又没有一技之长,这一辈子不就毁了吗?我感到很着急,为她担心。心理咨询师:难道一个人没有音乐特长,就真的活不下去了吗?你不也是没学成琴,不也过得很好吗?求助者:哦……

单选:本案例咨询谈话的最后两句,属于( )。

A.亚里士多德诡辩术

B.产婆术辩论法

C.合理情绪想象技术

D.合理分析报告

填空题