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

题目

在窗体上画一个名称为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
如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Prirate Sub Commandl_click() a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBoxa$,,b$,c$,1 End Sub 运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是( )。

A.software andhardware

B.software

C.hardware

D.1


正确答案:C

第2题:

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

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


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

第3题:

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

Private Sub Commandl_Click()

Dimi As Integer,j As Integer

Dima(10,10)As Integer

Fori=1 To 3

Forj=1 To 3

a(i,j)=(i-1)*3+j

Printa(i,j);

Nextj

Print

Nexti

End Sub

A.

B.

C.

D.


正确答案:D

第4题:

在窗体上画一个命令按钮,名称为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。

第5题:

在窗体上画一个命令按钮(名称为 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。

第6题:

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

Private Sub Commandl_Click( )

Static X As Integer

Static Y As Integer

Cls

Y=1

Y=Y+5

X=5+X

Print X, Y

End Sub

程序运行时,3次单击命令按钮Command1后,窗体上显示的结果为【 】。


正确答案:15 6
15 6 解析:在本题过程中使用了两个Static变量,其中的变量Y每次都被重新赋值,因此不管执行多少次,Y的结果只会是6;而变量X的值则一直累计,执行3次后,x为15。

第7题:

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

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


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

第8题:

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

A.机床

B.车床

C.钻床

D.轴承


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

第9题:

在窗体上画一个命令按钮,然后编写如下事件过程: 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。

第10题:

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

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


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

更多相关问题