niusouti.com
参考答案和解析
正确答案:B
B)【解析】本题考查循环程序的分析。在函数Funcl中,程序主要由一条嵌套的循环语句构成,如果m<>n,外循环内部的第一条内循环为除去m中包含的所有的n的倍数。第二条内循环为除去n中包含的m的倍数。最后计算到m和n相等。
更多“ 单击命令按钮时,下列程序段的执行结果为( )。A.8B.6C.4D.2 ”相关问题
  • 第1题:

    若看到程序中确以下事件过程,则可以肯定的是,当程序运行时( )。 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”事件。

  • 第2题:

    单击命令按钮时,下列程序段的执行结果为( )。 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

  • 第3题:

    单击命令按钮,下列程序段的输出结果为______。 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

  • 第4题:

    若看到程序中确以下事件过程,则可以肯定的是,当程序运行时( )。

    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”事件。

  • 第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