在窗体上画一个命令按钮,然后编写如下程序:Sub S1(ByVal x As Integer,ByVal y As Integer)Dim t

题目

在窗体上画一个命令按钮,然后编写如下程序: Sub S1(ByVal x As Integer,ByVal y As Integer) Dim t As Integer t=x x=y y=t End Sub Private Sub Command1_Click() Dim a As Integer,b As Integer a=10 b=30 S1 a,b Print"a=";a;"bc";b End Sub 程序运行后,单击命令按钮,输出结果是: ______。

A.a=30 b=10

B.a=30 b=30

C.a=10 b=30

D.a=10 b=10

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

第1题:

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

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


正确答案:20
20

第2题:

在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Pnvate Sub Command1_Click() Dim x As Integer,y As Integer,t As Integer x=10:y=20:t=0 If x=y Then t=x:x=y:y=t Print x;y End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

A.10 20

B.20 0

C.20 10

D.20 20


正确答案:A
解析:发生Command1的单击事件时,首先定义了三个变量x、y和t,并给它们赋值为10、20和0,然后判断Ⅱ后面的条件“x=y”为False,将不再执行Then后面的语句。此处需注意的是,用“:”分开的若干条语句要作为一个整体,要么都执行,要么都不执行,所以该题Then后面的三条语句都不执行。因此输出的x和y的值还是10和20。

第3题:

在窗体上画一个命令按钮,然后编写如下程序 Private Sub Command4 Click() Dim a As Integer,b As Integer a=1 b=2 Print N(a,B)End Sub Function N(x As Integer,y As Integer)As Integer N=IIf(x>y,x,y) End Function 程序运行后,单击命令按钮,输出结果为

A.l

B.2

C.5

D.8


正确答案:B
解析:事件过程N的作用是输出两个数中最大的,它调用了IIF函数,条件部分是(x>y),如果满足,那么N的值即为x的值,否则为y的值。在Sub过程中,定义了两个变量a,b,并赋给它们初值1,2,并调用Print函数,输出N(a,B)的值,因为xy,所以输出y=2。

第4题:

在窗体上画一个命令按钮,然后编写如下程序: Private Sub Commandl_Click( ) Dim a AS Integer,b As Integer a=15 b=2 t N(a,B)End Sub Function N(x As Integer,y As Integer) As Integer N=IIf(x)y,x,y) End Function 程序运行后,单击命令按钮,输出结果为

A.1

B.2

C.15

D.8


正确答案:C
解析:事件过程N的作用是输出两个数中最大的,它调用了IIF函数,条件部分是(x〉y),如果满足,那么N的值即为x的值,否则为y的值。在Sub过程中,定义了两个变量a,b,并赋给它们初值15,2,并调用Print函数,输出N(a,b)的值,因为x〉y,所以输出15。

第5题:

在窗体上画一个命令按钮,然后编写如下程序。运行后,单击命令按钮,输出结果为 ( )。

Private Sub Command4_Click()

Dima As Integer,bASInteger

a=1

b=2

PrintN(a,b)

End Sub

Function N(X As Integer,yAsInteger)AsInteger

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

End Funcfion

A.

B.

C.

D.


正确答案:B

第6题:

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

A.15 16

B.15 6

C.15 15

D.5 6


正确答案:B
解析:本题考查Static的用法。Static用于在过程中定义静态变量及数组变量。与Dim不同,如果用Static定义了一个变量,则每次引用该变量时,其值都会继续保留.本题中,三次单击命令按钮意味着每次Y值加5,X值也加5。由于在事件过程中事先给Y赋值1,所以每次单击按钮,Y值都被初始化为1,但X继续保留上次的值,即在第三次单击命令按钮时,X连加了3次5,Y值为1加5,故正确选项为D。

第7题:

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

第8题:

在窗体上画一个名称为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。

第9题:

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

A.机床

B.车床

C.钻床

D.轴承


正确答案:C
暂无解析,请参考用户分享笔记

第10题:

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

Private Sub Command1_Click()

x = -5

If Sgn(x) Then

 y = Sgn(x ^ 2)

Else

 y = Sgn(x)

End If

Print y

End Sub

程序运行后,单击命令按钮,窗体上显示的是( )。

A.-5

B.25

C.1

D.-1


正确答案:C