心理咨询与求助者商定的咨询目标不应该是()。
A.改变错误认知
B.减轻躯体症状
C.减轻焦虑症状
D.减轻恐怖症状
A.改变错误认知
B.减轻躯体症状
C.减轻焦虑症状
D.减轻恐怖症状
第1题
第2题
b p1(n As Integer) For i=n To 1 Step -1 x=String(i,"*") Print x Next i End Sub Private Sub Commandl_Click() P1(3) End Sub
A.*** ** *
B.* ** ***
C.* * *
D.******
第3题
第4题
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4,5)
For k=1 To 4
s=s+a(k)
Next
Print S
End Sub
A.10
B.14
C.15
D.120
第5题
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Command1_Click() Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End Sub
A.10
B.14
C.15
D.120
第6题
下面程序运行后,单击命令按钮,输出的结果是【 】 Private Sub Commandl_Click() Dim a%(1 To 4) ,b%(2 To 6) ,i%,strl,str2 For i=1 To 4 a(i) =i Next i For i=2 To 6 b(i) =i Next i str1 =YAG(A) str2 =YAG(B) Print"strl";str1;"str2=";str2 End Sub Function YAG (a()As Integer) Dim T,i% t=1 For i=LBound(A)To UBound(A) t=t * a(i) Next i YAG =t End Function
第7题
单击按钮时,以下程序运行后的输出结果是 Private Sub Commandl_Click() Dim X As Integer,y As Integer,z As Integer x=1:y=2: Z=3 Call God(x,x,z) Print x;x;z Call God(x,y,y) Print X;y;y End Sub Private Sub God(x As Integer,y As Integer,z As Integer) x=3 * Z + 1 y=2 * Z z=x + y End Sub
A.6 6 12 7 11 11
B.8 5 10 5 11 11
C.9 6 12 9 10 15
D.8 10 10 5 9 10
第8题
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() a:InputBox("Enter the First Integer") b:InputBox("Enter the Second Inteeer") Print b+a End Sub 程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是 ()
A.579
B.123
C.456
D.123456
第9题
在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果是()。
Private Sub p1(n As Integer)
For i=n To 1 Step-1
x=String(i,"*")
Print x
Next i
End Sub
Private Sub Command1_Click()
p1(3)
End SubA)
*B)C)D)
A.*** ** *
B.* ** ****
C.* * *
D.******
第10题
单击命令按钮时,下列程序的执行结果是 Private Sub Commandl_Click() BT 4 End Sub PriVate Sub BT(x As Integer) X=X * 2 + 1 If x <6 Then Call BT(x) End If X=x * 2 Print x; End Sub
A.15
B.16
C.17
D.18
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!