违法和不良信息举报 联系客服
免费注册 登录

若有如下Sub过程:Sub sfun(x As Single,y As Single)t=Xx=t／yy=t Mod YEnd Sub在窗体中添加一个

题目

若有如下Sub过程：

Sub sfun(x As Single，y As Single)

t=X

x=t／y

y=t Mod Y

End Sub

在窗体中添加一个命令按钮Command33，对应的事件过程如下：

Private Sub Command33_Click()

Dim a As Single

Dim b As Single

a=5： b=4

sfun a,b

MsgBox a＆chr(10)+chr(13)&b

End Sub

打开窗体运行后，单击命令按钮，消息框中有两行输出，内容分别为

A．1和1

B．1．25和1

C．1．25和4

D．5和4

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

第1题：

在程序设计中交换变量x和y的值，应使用的算法描述是（）。

A．t←x y←x y←t

B．x←y y←t t←x

C．x←y y←x

D．t←x x←y y←t


t←x x←y y←t

第2题：

试题33

若有如下Sub过程：

Sub sfun(x As Single , y As Single)

t=x

x=t/y

y=t Mod y

End Sub

在窗口中添加一个命令按钮Command33，对应的事件过程如下：

Private Sub Command32_Click()

Dim a As Single

Dim b As Single

a = 5 : b = 4

sfun( a , b )

MsgBox a & chr(10) + chr(13) & b

End Sub

打开窗体后，单击命令按钮，消息框中有两行输出，内容分别是（）

A．1和1

B．1.25和1

C．1.25和4

D．5和4


正确答案：B
试题33分析
函数sfun的功能是将x/y的值赋给x，x对y求模的值赋给y，所以5/4=1.25，5mod4=1。
试题33答案
B

第3题：

若有如下Sub过程： Subsfun(X As Single，y As Single) t=X x=t/Y y=t ModY End Sub 在窗体中添加一个命令按钮Command33，对应的事件过程如下： PrivateSub Command33 Click（ ） Dim a AsSingle Dim b AsSingle a=5：b=4 sfun(ab) MsgBoxa&chr(10)+chr(13)&b End Sub 打开窗体运行后，单击命令按钮，消息框中有两行输出，内容分别为（ ）。

A.1和1

B.1．25和1

C.1．25和4

D.5和4


正确答案：B
此题考查函数的调用情况，其中先执行tmx，x=t／y=13／4=1．25，y=tmodY=13mod4=1，所以答案选择B。

第4题：

变量x，y都是single类型，它们的值分别为10.7和20.3，变量t是整型，执行下面语句后，x，y的值变为()。t=x：x=y：y=t

A.10.7，20.3

B.20.3，10.7

C.20.3，11

D.20，10.7


本题答案：C

第5题：

假定有如下的Sub过程： sub sfun(x As Single, y As Single． t=x x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Command1．，然后编写如下事件过程： Private Sub Command1_Click(． Dim a as single Dim b as single a=5 b=4 sfun(a,b． MsgBox a & chr(10．+chr(13． & b End Sub 打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为

A.1和1m

B.1.25和1

C.1.25和4

D.5和4


正确答案：B
【解析】此题中设定了一个sfun(．函数，进行除法运算和求模运算，为命令按钮(名为Command1．编写事件，定义两变量a=5，b=4;调用此函数传递a，b的值给x，y进行运算，t=x=5,y=4;x=t/y=5/4=1.25(除法运算．;y=tMody=5mod4=1(求模运算．。所以本题答案为B。

第6题：

假定有如下的Sub过程： Sub sfun(x As Single,y As SinglE)t=x x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click( ) Dim a as single Dim b as single a=5 b=4 sfun a,b MsgBox a &char(10

A．1和1

B． 1.25和1

C． 1.25和4

D． 5和4


正确答案：B
解析： 此题中设定了一个sfun( )函数，进行除法运算和求模运算，为命令按钮(名为Command1)编写书件，定义两变量a＝5，b＝4：调用此函数传递a，b的值给x，y进行运算，t＝x＝5，y＝4；x＝t/y＝5/4＝1.25(除法运算)：y＝t Mod y＝5 mod 4＝1(求模运算)。

第7题：

编写如下通用过程： Sub Proc(x As Single,y As Single) t=x x＝t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim a As Single Dim b As Single a＝5 b＝4 Proc a,b Print a,b End Sub 程序运行后，如果单击命令按钮，则输出结果为

A．5 4

B．1.25 1

C．4 5

D．1.25 5


正确答案：B
解析：本题需掌握函数调用时的参数传递和运算符两方面的知识点。在执行调用语句Proc a，b后，函数proc内的参数x被a取代，y被b取代。执行t=x、x=t/y后，得x＝5/4即x为1.25。执行语句y＝tMody后，得y＝5 Mod 4即y的值为1。故执行调用函数后a，b的值变分别变为1.25和1。最后执行语句print a，b将a、b的值输出。选项B正确。

第8题：

有如下SUB过程：

Sub s(x As Single，y As Single)

t =x

x=t / y

Y=t Mod y

End Sub

在窗体上添加一个命令按纽，然后编写如下事件过程：

Private Sub Form_ Click()

Dim a As Single

Dim b As Single

a=5

b=4

s a，b

Print a，b

End Sub

则程序运行后，单击命令按纽，输出的结果为：【 】。


正确答案：1.25 1
1.25 1

第9题：

有如下SUB过程:

Sub s(x As Single,y As Single)

t=x

x=t / y

y=t Mod y

End Sub

在窗体上添加一个命令按钮,然后编写如下事件过程:

Private Sub Form_Click()

Dim a As Single

Dim b As Single

a=5

b=4

s a,b

Print a,b

End Sub

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


正确答案：1.251
1.25,1 解析：调用s过程,传入"a=5,b=4"。t=5 , x=5/4, 故x=1.25;y=5%4,故y=1。返回并输出(1.25,1)

相关内容