填空题

运行如下程序段： x=1 y=1 z=1 For j=1 To 3 For k=1 To 3 If j=1 Then x=x+y+z ElseIfj=2 Then x=2*x+2*y+2*z Else x=3*x+3*y+3*z End If Next k Next j x的值应是 【15】 。

【参考答案】

2346
<上一题 目录 下一题>
热门 试题

填空题
Access中，“自动创建报表”向导分为：纵栏式和 【10】 两种。
填空题
在窗体上画一个命令按钮，然后编写如下程序：Function fun(ByValnum As Long) As LongDim k As Longk=1num=Abs(num)Do While numk=k*(num 10)num=num 10Loopfun=kEnd FunctionPrivate Sub Command1_Click()Dim n As LongDim r As Longn=InputBox( 请输入一个数 )n=CLng(n)r=fun(n)MsgBox rEnd Sub程序运行后，单击命令按钮，在输入对话框中输入234，消息框显示的结果为 【14】 。
相关试题