niusouti.com

假定有如下的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 打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为

题目

假定有如下的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．1n1

B．1.25和1

C．1.25和4

D．5和4

相似考题

1.有如下SUB过程:Sub s(x As Single,y As Single)t=xx=t / yy=t Mod yEnd Sub在窗体上添加一个命令按钮,然后编写如下事件过程:Private Sub Form_Click()Dim a As SingleDim b As Singlea=5b=4s a,bPrint a,bEnd Sub则程序运行后,单击命令按钮,输出的结果为【 】 。

2.假定有如下的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和1B．1.25和1C．1.25和4D．5和4

3.假定有如下的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(10A．1和1B． 1.25和1C． 1.25和4D． 5和4

4.有如下SUB过程：Sub s(x As Single，y As Single)t =xx=t / yY=t Mod yEnd Sub在窗体上添加一个命令按纽，然后编写如下事件过程：Private Sub Form_ Click()Dim a As SingleDim b As Singlea=5b=4s a，bPrint a，bEnd Sub则程序运行后，单击命令按纽，输出的结果为：【 】。

更多“假定有如下的Sub过程:Sub sfun(x AsSingle,y AsSingle)t=xx=t／yy=t Mod yEnd Sub在窗体上添加一 ”相关问题

  • 第1题：

    假定有如下的Sub过程：

    Sub Sub1(x As Single，y As single)

    t=x

    x=t/y

    y=t Mod y

    End Sub

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

    Private Sub Command1_click()

    Dim a As Single

    Dim b As Single

    a=5

    b=4

    Sub1 a，b

    Print a；b

    End Sub

    程序运行后，单击命令按钮，输出结果为

    A．

    B．

    C．

    D．


    正确答案：D
    解析：在调用通用过程时要注意的是参数的传递方式。本题中两个变量都是以传值方式传递。根据传值方式的定义不难计算出本题结果。

  • 第2题：

    假定有如下的Sub过程： Sub sfun（X As Single，y As Single）t=XX=t／yY=tModYEndSub在窗体上添加一个命令按钮（名为Commandl），然后编写如下事件过程。 Private Sub Commandl Click（ ） Dim aAs singleDimbAs singlea=5b=4sfun a，bMsgBOX a&；chr（10）+chr（13）&；bEndSub打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为（ ）。

    A.1和1

    B.1．25和1

    C.1．25和4

    D.5和4


    正确答案：B
    暂无解析，请参考用户分享笔记

  • 第3题：

    在程序设计中交换变量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

  • 第4题：

    假定有如下的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。

  • 第5题：

    若有如下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。

相关内容