在窗体中添加一个命令按钮，并编写如下程序：Private Sub Command1_ Click() x=1: y=2: z=3 x=y: y=z: z=xEnd Sub程序执行后，输出的结果是______。A．3B．0C．2D．1

题目

在窗体中添加一个命令按钮，并编写如下程序：Private Sub Command1_ Click() x=1: y=2: z=3 x=y: y=z: z=xEnd Sub程序执行后，输出的结果是______。

A．3

B．0

C．2

D．1

相似考题

1.在窗体中添加命令按钮cmd，并编写如下程序：Funtion panduan(x As Integer,y As Integer) As Integerpanduan=IIF(x＞y,x,y)End FunctionPrivate Sub cmd_click()Dim a As Integer,b As Integera=4b=7MsgBox panduan( a, b)End Sub打开窗体单击命令按钮，消息框中输出的结果为【 】。

2.在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：Private Sub Command_Click()Dim x AS Integer， y As Integer， z As Integerx=5:y=7:z=0Me!Textl=””Call pl(x，y，z)Me!Text1=zEnd SubSub pl(a As Integer，b As Integer，c As Integer)C=a+bEnd Sub打开窗体运行后，单击命令按钮，文本框中显示的内容是【 】 。

3.在窗体上画一个名称为Command1 的命令按钮和一个名称为Text1的文本框，然后编写如下程序： Private Sub Command1_Click( ) Dim x,y,z As Integer x=5 y=7 z=0 Texttext = " " Call P1 (x,y,z) TextText = Str(z) End Sub Sub P1(ByVal a As Integer,ByVal b As Integer,c As Integer) c=a+b End Sub 程序运行后，如果单击命令按钮，在文本框中显示的内容是 ______。A．0B．12C．Str(z)D．没有显示

4.在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Text1)，然后编写如下事件过程：Private Sub Command1_Click()Dim x As Integer，y As Integer，z As Integerx=5：y=7：z=0Me!Text1=””Call p1(x,y,z)Me!Text1=zEnd SubSub p1(a As Integer，b As Integer，c As Integer)c=a+bEnd Sub打开窗体运行后，单击命令按钮，文本框中，显示的内容是【 】。

参考答案和解析
正确答案：C
解析：变量中的数据为最后一次赋的值。
更多“在窗体中添加一个命令按钮,并编写如下程序:Private Sub Command1_ Click()x=1: y=2: z=3x=y: y=z ”相关问题

  • 第1题：

    在窗体中添加一个名称为Command1的命令按钮和一个名称为text1的文本框，然后编写如下程序； ( ) Private Sub Commandl_Click() Dim x，y，z As Integer x=5：y＝7：z=O Text1．Text="" Call Pl(x，y，z) TextText＝Str(z) End Sub Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer) c=a+b End Sub

    A．0

    B．12

    C．Str(z)

    D．没有显示


    正确答案：B
    解析：本题主要是对调用Sub过程的考查。调用过程P1时，实参x，y，z的值分别传递到形参a，b，c。执行过程内的语句得 z=x+y即z=5+7。题中a，b参数是按值传送的，参数c是按址传送的，传值调用不影响实际参数，传址调用影响实际参数。故执行过程内的语句后z的值变为12而不是0。z是整型变量，可以使用Str函数将其转换为字符类型，然后赋给文本框的Text属性，使其在文本框中显示。

  • 第2题：

    在窗体中添加一个命令按钮，并编写如下程序： Private Sub Command1_CliCk() X=1∶Y=2∶Z=3 X=Y∶Y=Z∶Z=X Print Z End Sub 程序执行后，输出的结果是______。

    A．3

    B．0

    C．2

    D．1


    正确答案：C

  • 第3题：

    在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:Functionfun(xAsInteger)Staticzy=y＋1:z=z＋1fun=x＋y＋zEndFunctionPrivateSubCommand1_Click()DimxAsIntegerx=1Fori=1To2Printfun(x)NextiEndSub程序运行后,如果单击命令按钮,窗体中显示的内容是( )

    A、33

    B.34

    C.3

    D.3


    正确答案：D

  • 第4题：

    在窗体上画一个命令按钮，然后编写如下代码。运行程序后，单击命令按钮，依次在输人对话框中输入2，7，5，3，8，5，12，6，12，在窗体上输出的结果是______。 Private Sub Command1 Click() z=5 Do Until z＜＞5 x=InputBox<“请输入x值”) x=Val(x) y=InputBox(“请输入y值”) y=Val(y) z=InputBox(“请输入z值”) z=Val(z) y=x+y+2 * z Loop Print y End Sub

    A．19

    B．21

    C．42

    D．19


    正确答案：C
    解析：InputBox()函数的功能是在一个对话框中提示用户输入信息，在确认(即单击“确定”按钮)之后将输入的内容以字符串形式返回，在程序中使用InputBox()函数分别为x、y和z变量赋值，当变量2的值不等于5的时候，结束循环，将得到的x、y、2的值进行运算(x+y+2z)，在窗体上打印(Print)输出运算结果。程序运行后，前两次输入的2值都是5，所以程序不会跳出循环，当第3次输入时，得到的x、y、z值分别为12、6、12，此时的2值不为5，程序结束循环并输出运算结果：12+6+2*12＝42。

  • 第5题：

    在窗体中添加一个名称为Command1命令按钮和一个名称为text1的文本框，然后编写如下程序：

    PrivateSubCommand1_Click()

    Dimx,y,zAsInteger

    x=5:y=7:z=0

    Text1.Text=""

    Callp1(x,y,z)

    Text1.Text=Str(z)

    EndSub

    Subp1(ByValaAsInteger,ByValbAsInteger,cAsInteger)

    c=a+b

    EndSub

    程序运行后，如果单击命令按钮，文本框中显示的是( )

    A、0

    B.12

    C.Str(z)

    D.没有显示


    正确答案：B

相关内容