在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Private Sub Command1_Click() Static x As Integer Stati cy As Integer y=1 y=y+5 x=x+5 Printx;y End Sub 程序运行时,三次单击命令按钮Commandl后,窗体上显示的结果为()A、1516B、156C、1515D、56

题目

在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Private Sub Command1_Click() Static x As Integer Stati cy As Integer y=1 y=y+5 x=x+5 Printx;y End Sub 程序运行时,三次单击命令按钮Commandl后,窗体上显示的结果为()

  • A、1516
  • B、156
  • C、1515
  • D、56

相似考题
参考答案和解析
正确答案:B
更多“在窗体上画一个名称为Commandl的命令按钮,然后编写如下程”相关问题
  • 第1题:

    在窗体上添加一个命令按钮(名为Commandl),然后编写如下程序:

    打开窗体运行后,单击命令按钮,消息框的输出结果为__________。


    正确答案:
    20【解析】本题考查IIf函数的知识。对于Ⅱf函数可用于执行简单的条件判断操作,当第一个参数为真时返回第二个参数值,否则返回第三个参数值。因为x>y为假,所以返回Y的值也就是返回20。

  • 第2题:

    在窗体上画一个命令按钮(名称为 Commandl),然后编写如下事件过程: Private Sub Commandl_Click() Static a As Integer a=a+1 End Sub 运行程序,第3次单击命令按钮后,变量a的值为( )

    A.0

    B.1

    C.2

    D.3


    正确答案:D
    解析:由Static语句定义的变量只建立一次,能在过程结束后保存原值。题中第一次单击命令按扭时,a的初始值为o,执行语句后a的值变为1;在第二次单击按扭时,a的初始值应保留上次的结果值1,执行语句后 a的值变为2;同理在第三次单击按扭后,变量 a的值变为3。

  • 第3题:

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

    Privme Sub Commandl_Click()

    Dim intNum As Integer

    intNum=InputBox(“请输入:”)

    MsgBox f(intNum)

    End Sub

    Function f(X As Integer) As Integer

    f=IIf (X<10,X,X+5)

    End Function

    运行程序,单击命令按钮,在输入对话框中输入5,则程序的输出结果为______。


    正确答案:5
    5 解析: 本题考查IIf函数和函数调用的知识。本题中调用函数f(intNum) ,也就是将intNum的值5传给形参X;IIf函数可用于执行简单的条件判断操作,此函数有3个参数,当第一个参数为真时返回第二个参数值,否则返回第三个参数值。因为X<10为真,所以返回并输出的值也就是5。

  • 第4题:

    在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:

    程序运行后,单击命令按钮,在文本框中显示的值是__________。


    正确答案:
    30【解析】本题考查VBA中二维数组和循环的知识。本题属于比较简单的问题,使用了二重循环为二维数组进行了部分赋值,最后求两个数组元素值并求和,注意这两个元素是否已被赋值,若没有赋值则为0。本题中对于a(2,3)赋值为2*3也就是6,a(4,6)赋值为4*6也就是24,最后的结果为6 24=30。

  • 第5题:

    在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A. 机床

    B. 车床

    C. 钻床

    D. 轴承


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

  • 第6题:

    在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是

    A.VVV

    B.Vis

    C.sic

    D.11


    正确答案:A
    解析:本题考查字符串函数。 String返回n个字符。如果为字符串,则返回n个字符串的首字符。据此,本题的正确答案为A,即返回3个“Visual Basic”的首字母“V”。

  • 第7题:

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

    Pfivae Sub Commandl_click()

    a=0

    For i=1 To 2

    For j=1 To 4

    If i Mod 2<>0 Then

    a=a-1

    End If

    a=a+1

    Next j

    Next I

    MsgBox a

    End Sub

    程序运行后,单击命令按钮,消息框中的输出结果是______。


    正确答案:4
    4 解析: 本题考查多重循环的知识。类似这种问题要把握住两点:首先看内循环里面完成了什么工作,有什么规律,然后看外循环和内循环的次数。本题中内循环和外循环的次数完全无关,则每次外循环和内循环都会执行4次。可以看出当j=1和。i=3时由于满足If语句的条件,所以会先执行a=a-1后执行a=a+1,实际上相当于a的值没有变化;当j=2和j=4叫时由于不满足If语句的条件,所以只能执行a=a+1。也就是说外循环每执行一次a的值都会加2,由于外循环共执行2次,所以结果为4。

  • 第8题:

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

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

    A.

    B.H

    C.

    D.


    正确答案:A
    【解析】分析程序,程序开始循环时i=1,j=1to1,PrintSUing(i,“Hello”)语句输出一个H,然后执行Print进行换行;当i=2时,j=1to2,PrintString(i,“Hello”)语句输出两行分别为两个HH,然后执行Print换行:当i=3时,退出循环。

  • 第9题:

    在窗体中添加一个命令按钮(名称为Commandl),然后编写如下代码:

    窗体打开运行后,如果单击命令按钮,则消息框的输出结果为( )。

    A)0

    B)9

    C)a=9

    D)False


    正确答案:D
    本题考查VBA程序设计的基础知识。程序中的”MsgBoxa=bC”语句中的“=”的含义是判断是否相等而不是赋值,这条语句的含义是在消息框中显示a与bC的值比较的结果,由于变量的初值”a=3:b=4:C=5”,所以判断条件语句相当于判断3=9是否为真,很明显结果为假,所以消息框的输出结果为逻辑假False。

  • 第10题:

    在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程: Private Sub Commandl_Click() Dim a() a=Array(“机床”,“车床”,“钻床”,“轴承”) Print a(2) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.机床

    B.车床

    C.钻床

    D.轴承


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

  • 第11题:

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

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


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

  • 第12题:

    在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl),然后编写如下事件过程:


    正确答案:
    15【解析】本题考查VBA程序中过程调用的知识。由于VBA中,默认情况下,参数是按地址传递(ByRef),对形参的改变会影响到实参。本题中2的值等于a b,这个z值会返回给实参c,所以文本框中显示的内容为15。

  • 第13题:

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

    程序运行后,单击命令按钮,其输出结果为__________。


    正确答案:
    9【解析】本题考查VBA中程序设计的知识。对于这个问题,首先注意到循环的次数为6次;然后注意到循环内的两个If语句为顺序关系而不是嵌套关系,第一个If语句只有第一次循环时才会满足;第一次循环时首先执行第一个If语句把x赋值为1,然后执行第二个If语句;以后各次循环均照此分析,前4次循环x自加l,后两次循环X自加2,最后输出结果为9。

  • 第14题:

    在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后,单击命令按钮,在输入对话框中输入123,则在窗体上输出的内容为( )

    A.123345

    B.468

    C.123

    D.345


    正确答案:B
    解析:InputBox函数返回的是字符串类型值,故x应为字符串类型。执行语句Print x+345时,x的类型自动转换为整型。相当于执行了123、345两数的和,故窗体上的输出内容为468。

  • 第15题:

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

    程序运行后,单击命令按钮,消息框输出的是系统当前日期和当前时间。


    正确答案:
    72【解析】本题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值,最后求两个数组元素值的积。我们只需要注意这两个数组元素在循环中被赋了什么值,当i=3,j=3时,al(3,3)=3 3=6,a2(3,3)=al(3,3) 3 3=12,所以最后二者之积为72。

  • 第16题:

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

    运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是__________。


    正确答案:
    hardware【解析】本题考查消息框的知识。使用MsgBox函数来弹出消息框,此函数的使用格式为:MsgBox(prompt[,buttons][,title][,helpfile,context])其中第一个参数是显示在对话框中的消息,第二个参数是按钮的数目及形式,第三个参数是对话框标题栏显示的字符串,后面的是帮助文件以及帮助上下文编号。第一个参数必需有,其余参数可省略,但是若中间若干个参数省略时不能省略逗号分隔符。本题中第三个参数是变量b,即hardware。

  • 第17题:

    在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序:窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。

    A. 3

    B. 4

    C. 6

    D. 7


    正确答案:A
    本题考查VBA中参数传递的知识。在 VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用;若用 ByRef声明,说明此参数为传址调用:没有说明传递类型,则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x,说明为传值调用,此时对X的任何更改不会影响调用它的实参i,所以执行完Call f(i)这条语句后i的值不变仍为3,当然也不满足If语句的条件,故此最后输出结果为3。

  • 第18题:

    在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在面体上显示的内容是( )。


    正确答案:A
    A)    【解析】本题考查循环嵌套程序分析。外层循环共执行2次,第一次执行外循环,内层循环变量为1到1,执行一次;第二次执行外循环,内层循环变量为1到2,执行2次。String 函数产生i个“Hello”中的第一个字符H。

  • 第19题:

    在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: PrivateSubCommandl_CnCk() aS="VisualBasic", Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是( )。

    A.VVV

    B.Vis

    C.sic

    D.11


    正确答案:A

  • 第20题:

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

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

    A)机床

    B)车床

    C)钻床

    D)轴承


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

  • 第21题:

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

    Private Sub Commandl_Click()

    For I=1 T0 2

    For J=1 To I

    Print String(I,″Hello″);

    Next J

    Print

    Next I

    End Sub

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

    A.H HH HH

    B.H HHHH

    C.HHHHH

    D.H HH HHHH


    正确答案:B
    解析:Click事件是在按钮控件上按下然后释放一个鼠标按钮时发生。Print函数用于在指定窗口显示文本。String 函数返回包含指定长度重复字符的字符串。题中嵌套For循环,第一次"i=1",故"for j=1 to 1",输出"H",内层J循环结束,输出空行。第二次"i=2",故"for j=1 to 2",内层J循环2次,输出"HHHH",内层J循环结束,输出空行,I循环结束。

  • 第22题:

    在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Forn=1 To 20 If n Mod 3<>Thenm=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。

    A.15

    B.18

    C.21

    D.24


    正确答案:C
    解析:本题考查的是For…Next循环语句。For…Next循环执行时,先将初始值赋给循环变量,判断是否超过终值,若未超过则执行循环体,遇到Next语句后,循环变量增加一个步长(默认值为1),再判断是否超过终值,若未超过则继续执行循环体,如此重复直到循环变量超过终值,退出循环。本题中的循环变量为n,步长为1,当n=20时,再执行Nextn,则n=21,此时n大于终值20,退出循环。

  • 第23题:

    在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序:

    窗体打开运行后,单击命令按钮,则消息框的输出结果为__________。


    正确答案:
    2500【解析】本题考查循环的知识。这个问题比较简单,实际上就是求l到100之间的奇数和,最终结果为2500。