niusouti.com

在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序:Function a(x As Integer, y As Integer) As Integera = IIf(x > y, x, y)End FunctionPrivate Sub Command1_Click()Dim n As Integer, m As Integern = 10m = 20Print a(n, m)End Sub程序运行后,单击命令按钮,输出结果是______。

题目

在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序:

Function a(x As Integer, y As Integer) As Integer

a = IIf(x > y, x, y)

End Function

Private Sub Command1_Click()

Dim n As Integer, m As Integer

n = 10

m = 20

Print a(n, m)

End Sub

程序运行后,单击命令按钮,输出结果是______。


相似考题
更多“在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序:Function a(x As Integer, y As Int ”相关问题
  • 第1题:

    在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:

    Private Sub Corrtmandl Click()

    a$=”Nationalcomputer rank Examination”

    n=Len(a$)

    S=0

    For i=1 To n

    b$=Mid(a$,i,1)

    Ifb$=”n”Then

    s=s+1

    End If

    Next i

    Print s

    End Sub

    程序运行后,单击命令按钮,输出结果是【 】。


    正确答案:4
    4 解析:此题实际上是从左自右逐个提取a$中的字符,判断是不是等于“n”,统计其中“n',的个数。

  • 第2题:

    在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:

    程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A)机床

    B)车床

    C)钻床

    D)轴承


    正确答案:C
    本题考查VBA中数组的知识。数组变量由变量名和数组下标构成,我们通常使用Dim语句来定义数组,其中下标下限缺省为0。本题中的af2)就是数组的第三个元素即“钻床”。

  • 第3题:

    在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl),然后编写如下事件过程:

    程序运行后,在文本框中输入3,然后单击命令按钮,则Y的值变为__________。


    正确答案:
    9【解析】本题考查多分支语句SelectCase的知识。SelectCase用于实现多分支结构,其使用格式为: 其功能是根据“测试表达式”的值,从多个语句块中选择符合条件的一个语句块执行.如果测试表达式的值等于某一个表达式的值,则选择该语句块的语句执行,执行完毕后退出Case结构。本题中由于x的值为3,符合第一个Case语句的条件,所以执行y=x*x后退出Case结构,最后Y的值为9。

  • 第4题:

    3在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: PrivateSubCommand1_Click() Static X As Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X PrintX,Y EndSub 程序运行时,3次单击命令按钮Commandl后,窗体上显示的结果为( )。

    A.15 16

    B.156

    C.15 15

    D.56


    正确答案:B

  • 第5题:

    在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序: Pfivate Sub Commandl_Click() Dima(10) As Integer Dimx As Integer Fori=1 To 10 a(i)=8+i NeXt X=2 Print a(f(x)+x) End Sub Function f(X As Integer) X=X+3 f=X End Fu

    A.12

    B.15

    C.17

    D.18


    正确答案:D