单击命令按钮时，下列程序段的执行结果为（）。A. 8B. 6C. 4D. 2

题目

单击命令按钮时，下列程序段的执行结果为（）。

A. 8

B. 6

C. 4

D. 2

如果没有搜索结果或未解决您的问题，请直接联系老师获取答案。

相似问题和答案

第1题：

单击命令按钮时，下列程序代码的执行结果为______ 。Public Function MyFune(m As Integer，n As Integer) As Integer Do While m＜＞n Do While m＞n m=m-n Loop Do While m＜n n=n -m Loop Loop MyFunc=mEnd FunctionPrivate Sub Command1_Click() Print MyFunc(24, 18)End Sub

A． 2

B．4

C．6

D．8

正确答案：C

第2题：

若看到程序中确以下事件过程，则可以肯定的是，当程序运行时（）。

Private Sub Click—MouseDown(Button As Integer，Shift As Integer，X As Single，Y

As Single)

Print"VB Program"

End Sub

A.用鼠标左键单击名称为“Command1”的命令按钮时，执行此过程

B.用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程

C.用鼠标右键单击名称为“MouseDown”的命令按钮时，执行此过程

D.用鼠标左键或右键单击名称为“Click”的命令按钮时，执行此过程

正确答案：D
D。【解析】事件过程的命名方式一般为事件对象_事件名，所以该事件应为“Click”的“MouseDown”事件。

第3题：

单击命令按钮时，下列程序段的执行结果为（）。

A.8

B.6

C.4

D.2

正确答案：B
B)【解析】本题考查循环程序的分析。在函数Funcl中，程序主要由一条嵌套的循环语句构成，如果m<>n，外循环内部的第一条内循环为除去m中包含的所有的n的倍数。第二条内循环为除去n中包含的m的倍数。最后计算到m和n相等。

第4题：

单击命令按钮，下列程序段的输出结果为______。 Private Sub Command1_Click() Dim n As Integer n = 5 While n ＜= 10 n = n + 2 Print n; Wend End Sub

A．5 7 9 11

B．6 8 10

C．7 9 11

D．6 8 10 12

正确答案：C

第5题：

单击命令按钮时，下列程序段的执行结果为( )。 Private Sub Command1_Click() Dim FirstStr As String FirstStr="abcdef" Print PickMid(FirstStr) End Sub Private Function PickMid(xStr As String)As String Dim tempStr As String,strLen As Integer TempStr=" " strLen=Len(xStr) i=1 Do While i＜=strLen/2 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr,strLen-i+1,1) i=i+1 Loop PickMid=tempStr End Funcfion

A．abcdef

B．fed

C．fedcba

D．defabc

正确答案：B

第6题：

若看到程序中确以下事件过程，则可以肯定的是，当程序运行时（）。 Private Sub Click—MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Print"VB Program" End Sub

A.用鼠标左键单击名称为“Command1”的命令按钮时，执行此过程

B.用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程

C.用鼠标右键单击名称为“MouseDown”的命令按钮时，执行此过程

D.用鼠标左键或右键单击名称为“Click”的命令按钮时，执行此过程

正确答案：D
D。【解析】事件过程的命名方式一般为事件对象_事件名，所以该事件应为“Click”的“MouseDown”事件。

第7题：

单击命令按钮时，下列程序段的执行结果为( )。 Public Sub Procl(n As Integer,ByVal m As Integer) n=n Mod 10 m=m\10 End Sub Private Sub Command1_Click() Dim x As Integer,y As Integer x=12;y=34 Call Procl(x,y) Print x;y End Sub

A．12 34

B．2 34

C．2 3

D．12 3

正确答案：B

第8题：

单击命令按钮时，下列程序的执行结果是 Private Sub Book( x As Integer) x=x*2+1 If x＜6 Then Call Book(x) End If x=x * 2 + 1 Print x; End Sub Private Sub Command2_Click( ) Book 2 End Sub

A．23 47

B．10 36

C．22 44

D．24 50

正确答案：A
解析：此题在函数调用过程中采用了简单递归的方式，具体流程如下：主调过程调用Book过程，把实参2传递给Book过程中的形参x，由x=x*2+1语句推出x=5，此时满足Book过程体中判断语句的判断条件，执行Call Book(x)语句，第二次调用Book过程。由x=x*2+1语句得到x值为11，判断条件116为假，故返回此调用过程执行x=x*2+1语句得x=23并输出，结束此次调用过程。由于两次调用Book过程，第二次仍返回调用时的断点语句，即执行x=x*2+ 1，Print x，输出x的值为47，返回到主调过程，结束程序，两次输出为23 47，正确答案为选项A。注意：递归调用法是Visual Basic中一种特殊的函数调用方法。这种函数采用嵌套调用函数本身的方式调用函数。

第9题：

单击命令按钮时，下列程序的执行结果是 Private Sub Book(x As Integer) x=x * 2 + l If x＜6 Then Call Book(x) End If X=X * 2 + 1 Print x； End Sub Private Sub Command2_Click() Book2 End Sub

A．23 47

B．10 36

C．22 44

D．24 50

正确答案：A
解析：此题在函数调用过程中采用了简单递归的方式，具体流程如下：主调过程调用Book过程，把实参2传递给Book过程中的形参x，由x=x*2+1语句推出x=5，此时满足Book过程体中判断语句的判断条件，执行CallBook(x)语句，第二次调用Book过程。由x=x*2+1语句得到x值为11，判断条件1l6为假，故返回此调用过程执行x=x*2+1语句，的x=23并输出，结束此次调用过程。由于两次调用Book过程，第二次仍返回调用时的断点语句，即执行x=x*2+1，Printx，输出x的值为47，返回到主调过程，结束程序，两次输出为2347，正确答案为选项A。

第10题：

单击命令按钮时，下列程序代码的执行结果为 Private Sub Command1_Click( ) Print MyFunc(24，18) End Sub Public Function MyFunc(m As Integer，n As Integer)As Integer Do While m ◇ n Do While m>n：m=m—n：Loop DO While m＜n：n=n-m：Loop Loop My Func=m End Function

A．2

B．4

C．6

D．8

正确答案：C
解析：根据Myfune的定义，当m与n不相等时执行D。循环，此时如果m大于n，则执行m=m-n的Do循环。据此，MyFune(24，18)的值应该为24减去18。

单击命令按钮时，下列程序段的执行结果为（ ）。A. 8B. 6C. 4D. 2

题目

相似问题和答案

相关内容

单击命令按钮时，下列程序段的执行结果为（）。A. 8B. 6C. 4D. 2