填空题

运行如下程序段： x=1 y=1 Z=1 For j=1 To 3 For k=1 TO 3 If j=1 Then x=x+y+2 ElseIf j=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
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个命令按钮，然后编写如下程序：Function fun (ByVal num 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】 。
填空题
Access的窗体或报表事件可以有两种方法来响应：宏对象和 【12】 。
相关试题