问答题

阅读下面的程序段： for i=1 to 3 for j=i to 1 for k=j to 3 a=a+1 next k next j next i 执行上面的三重循环后，a的值为 【 】 。

【参考答案】

正确答案：14
<上一题 目录 下一题>
热门 试题

问答题
执行下面的程序，消息框里显示的结果是 【 】 。 Private Sub Form_Click() Dim Str As String，K As Integer Str= ab ， For k=Len(Str)To 1 Step-1 Str=-Str & Chr(Asc(Mid(Str,k，1))+k) Next k MsgBox Str End Sub 。
问答题
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序： Function m(x as Integer,y as InteSer)as Integer m=IIf(x＞y,x,y) EndFunction Private Sub Command1_Click() Dim a as Integer,b as InteSer a=l b=2 MsgBox m(a,B) End Sub 打开窗体运行后，单击命令按钮，消息框的输出结果为 【 】 。
相关试题