Strl= inpuTbox("请输入一个字符串") Str2=Fun(Strl) Print si End sub 程序运行后,单击命令按钮,如果在输入对话框中输入字符串“ abcdefg”,则单击“确 定”按钮后在窗体上的输出结果为()。 A) ABCDEFG C) GFEDCBA D)gfedcba (34)为计算a"的值,某人编写了函数 power如下 Private Function power(a As Integer, n As Integer)As Long Dim p As long For k=l To n P-p power End Function 在调试时发现是错误的,例如 Print power(5,4)的输出应该是625,但实际输出是3125。 程序需要修改。下面的修改方案中有3个是正确的,错误的一个是() A)把Fork=1Ton改为Fork=2Ton B)把p=p*a改为p=p^n C)把Fork=lTon改为Fork=1Ton1D)把p=a改为p=1 (35)某人编写了下面的程序 Private Sub Commandl Click() As Inte a= Input Box("请输入整数") tBox("请输入整数") Call pro(a+b) End Sub Private Sub pro(n As Integer) While(n>o Print n mod 10 n=n\10 End sub 此程序功能是:输入2个正整数,反序输出这2个数的每一位数字,再反序输出这2 个数之和的每一位数字。例如:若输入123和234,则应该输出 347 但调试时发现只输出了前2行(即2个数的反序),而未输出第3行(即2个数之和 的反序),程序需要修改。下面的修改方案中正确的是()。 A)把过程pro的形式参数 n As Integer改为 By Val n As Integer 二级Ⅴ isual basic语言程序设计试卷第7页(共10页)二级 Visual Basic 语言程序设计试卷 第 7 页（共 10 页） Str1=InputBox("请输入一个字符串") Str2=Fun(Str1) Print Srt2 End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确 定”按钮后在窗体上的输出结果为（ ）。 A）ABCDEFG B）abcdefg C）GFEDCBA D）gfedcba （34）为计算 a n 的值，某人编写了函数 power 如下： Private Function power (a As Integer, n As Integer) As Long Dim p As Long p=a For k=1 To n p=p*a Next k power=p End Function 在调试时发现是错误的，例如 Print power(5,4)的输出应该是 625，但实际输出是 3125。 程序需要修改。下面的修改方案中有 3 个是正确的，错误的一个是（ ）。 A）把 For k=1 To n 改为 For k=2 To n B）把 p=p*a 改为 p=p^n C）把 For k=1 To n 改为 For k=1 To n-1 D）把 p=a 改为 p=1 （35）某人编写了下面的程序 Private Sub Command1_Click( ) Dim a As Integer, b As Integer a=InputBox("请输入整数") b=InputBox("请输入整数") pro a pro b Call pro(a+b) End Sub Private Sub pro(n As Integer) While (n>0) Print n Mod 10; n=n\10 Wend Print End Sub 此程序功能是：输入 2 个正整数，反序输出这 2 个数的每一位数字，再反序输出这 2 个数之和的每一位数字。例如：若输入 123 和 234，则应该输出： 3 2 1 4 3 2 7 5 3 但调试时发现只输出了前 2 行（即 2 个数的反序），而未输出第 3 行（即 2 个数之和 的反序），程序需要修改。下面的修改方案中正确的是（ ）。 A）把过程 pro 的形式参数 n As Integer 改为 ByVal n As Integer