题目内容

运行下面的程序，第二行显示结果是_____ 。Private Sub Command1_Click()Dim a(5) As IntegerFor i = 1 To 5a(i) = i*iPrint a(i);NextiPrintf aFor i = 1 To 5Print a(i);NextiEnd SubPrivate Function f(b() As Integer)For i = LBound(b) To UBound(b)b(i) = b(i) + 5NextiEnd Function

查看答案

搜索结果不匹配？点我反馈

更多问题

运行下面的程序，第二行显示结果是___________。Private Sub Form_Click()Dim A As IntegerDim i As IntegerA = 5For i = 1 To 9Call sub1(i, A)Print i, ANext iEnd SubPrivate Sub sub1(x As Integer, y As Integer)Static N As IntegerDim I As IntegerFor I = 3 To 1 Step -1N = N + xx = x + 2Next Iy = y + NEnd Sub

运行下列程序，依次点击第一个和第二个按钮，结果为___________。Dim a As Integer ' 在窗体通用部分定义a为窗体模块级的变量Private Sub Command1_Click()Dim b As Integera = 50b = 80End SubPrivate Sub Command2_Click()Dim b As IntegerPrint a;Print bEnd Sub

运行下面的程序，显示结果是___________。Private Function digit(n As Integer, k As Integer) As Integerdigit = 0Do While k > 0digit = n Mod 10n = n \ 10: k = k - 1LoopEnd FunctionPrivate Sub Form_Click()Print digit(3456, 4);Print digit(3456, 3)End Sub

Write a word that is similar in meaning to the underlined part.The curve of the substructure allows water to run off of it.( c _ _ b _ _ )