阅读下列程序： Private Sub Commad1_Click() Dim i As Integer,k As Integer k＝2 For i＝1 To 3 Print H(k) Next i End Sub Function H(j As Integer) a＝0 Static b a＝a+1 b＝b+1 H＝a*b+j End Function 程序运行后，单击命令按钮输出结果是
- A234
- B345
- C567
- D356
问题
阅读下列程序： Private Sub Commad1_Click() Di
参考解析：
解析：在此题中，被调过程是一个函数过程，它有一个形式参数j，在被调过程声明中，定义了一个参数a，初值为o，一个静态变量b。语句a＝a+1和b＝b+1分别使a和b各增加1，然后返回H的值，因为b是静态变量，所以每次调用同一个参数k时，b会保留前次的数值，使输出结果变化，否则每次输出的结果都将是一样的。根据分析，第一次调用时a=1，b＝1，H＝3；第二次凋用：a＝1，b＝ 2，H＝4；第三次调用：a＝1，b＝3，H＝5。所以最后的输出结果是345。
分类：其他
相关推荐
-
1、下列程序段运行后输出的结果是（）。 Private Sub Form_Cl
下列程序段运行后输出的结果是（）。Private SubForm_Click Dim X#, Y#X = 5: Y = 6Print X + Y = 11 End SubAX+Y=11B5+6=11C11DTrue
-
2、设有如下程序： Option Base 0 Private Sub For
设有如下程序：Option Base 0Private Sub Form_Click()Dim aDim i As Integera = Array(1,2,3,4,5,6,7,8,9)For i = 0 To 3Print a(5 – i);Next End S...
-
3、单击命令按钮时，下列程序代码的运行结果为 Private Sub Comma
单击命令按钮时，下列程序代码的运行结果为 Private Sub Command1_Click() Print MyFunc(20, 18) End Sub Public Function MyFunc(m As Integer, n As Integer)...
-
4、某人设计了如下程序用于计算并输出7!(7的阶乘)： Private Sub
某人设计了如下程序用于计算并输出7!(7的阶乘)： Private Sub Command1_Click t = 0 For k = 7 To 2 Step -1 t = t * k Next Print t End Sub 执行程...
-
5、设有如下程序： Private Sub Form_Click() A=1 F
设有如下程序： Private Sub Form_Click() A=1 For i＝1 To 3 Select Case i Case 1,3 A＝A+1 Case 2,4 A＝A+2 End Select Next i Print A End Sub 程序运行后，单击窗体，则在窗体上显示的内容是A6B5C4D3
-
6、设有如下程序： Private Sub Command1_Click() D
设有如下程序： Private Sub Command1_Click() Dim sum As Double，x As Double sum=0 n=0 For i=1 To 5 x=n/i n=n+1 sum=sum+x Next End Sub 该程序通过...