编写如下事件过程： Private Sub Form_Activate() Dimscore(1 to 3)As Integer Dimi As Integer Dim t As Variant Fori= 3 To 1 Step-1 score(i)=2*i Nexti ForEach t Inscore Printt Next End Sub 程序运行后窗体上显示的值是( )。A．642B．246C．2D．6

题目

编写如下事件过程： Private Sub Form_Activate() Dimscore(1 to 3)As Integer Dimi As Integer Dim t As Variant Fori= 3 To 1 Step-1 score(i)=2*i Nexti ForEach t Inscore Printt Next End Sub 程序运行后窗体上显示的值是( )。

A．642

B．246

C．2

D．6

相似考题

1.有如下事件过程：Private Sub Form. Active ( )Dim Score (1 to 3) As IntegerDim i As IntegerDim t As VariantFori=3 To 1 step-1Score (i) = 2 * iNextFor Each t In ScorePrint tNextEnd 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 &char(10A．1和1B． 1.25和1C． 1.25和4D． 5和4

3.假定有如下的Sub过程：Sub Sub1(x As Single，y As single)t=xx=t/yy=t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_click()Dim a As SingleDim b As Singlea=5b=4Sub1 a，bPrint a；bEnd Sub程序运行后，单击命令按钮，输出结果为A．B．C．D．

4.编写如下通用过程： 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 4B．1.25 1C．4 5D．1.25 5

更多“编写如下事件过程:Private Sub Form_Activate()Dimscore(1 to 3)As IntegerDimi As IntegerDim t ”相关问题

  • 第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．54

    B．] 1]]1

    C．] 1.2]]5.4

    D．] 1.25]]1


    正确答案：D
    解析：Sub过程与Function过程最根本的区别是：Sub过程的过程参数名称不能有返回值，而Function过程能通过过程名称得到返回值。

  • 第2题：

    有如下Sub过程： Sub Sun(x As Single, y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上的命令按钮Command1中，编写如下事件过程，执行该事件过程调用Sun过程，结果为( )。 Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a, b Print a; b End Sub

    A．1.25 1

    B．5 4

    C．4 5

    D．1 1.25


    正确答案：A
    解析：本题考查过程的调用，如果用Call句调用子过程时，实际参数要放在括号中，如果不使用Call子句，则不必使用括号。本题参数调用时是按地址传递，因此Sun过程中变量的值改变也即改变了单击事件中的a、b变量值。Suna,b的执行过程是：t=x=5,x=t/y=1.25，y=tMody=1。

  • 第3题：

    编写如下通用过程： Sub Proc(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 Proc a, b Print a, b End Sub 程序运行后，如果单击命令按钮，则输出结果为

    A．5 4

    B．1.25 1

    C．4 5

    D．1.25 5


    正确答案：B
    解析：本题中的Proc过程有两个参数，均为单精度类型，由于没有ByVal关键字，参数使用的是引用(即传址)方式。也就是说，实参a、b与形参x、y使用的是相同的地址。因此，由过程Proc计算出来的x、y的值实际上与实参a、b的值相同。在事件过程中，执行Proca，b语句后，就将a(值为5)、b(值为4)的值分别传送给过程Proc中的x、y，使得x=5，y=4。在过程中，首先将x的值赋给t，即t的值为5，然后执行；x=t/y=5/4=1.25和y=tmody=5Mod4=1。

  • 第4题：

    假定有如下的Sub过程：Sub Sub1 (x As Single, y As Single) t=x x = t/y y = t Mod yEnd 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．5 4

    B．1 1

    C．1.2 5.4

    D．1.25 1


    正确答案：D
    解析：本题重点是在子过程的调用过程中，虚实参数的传送问题，变量a和b按址传送，返回子过程的x和y值。

  • 第5题：

    有如下Sub过程： Sub Sun(x As Single，y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上的命令按钮Command1中，编写如下事件过程，执行该事件过程调用Sun过程，结果为( )。 Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a，b Print a；b End Sub

    A．1.25 1

    B．5 4

    C．4 5

    D．1 1.25


    正确答案：A
    解析：本题考查过程的调用，如果用Call语句调用子过程时，实际参数要放在括号中，如果不使用Call子句，则不必使用括号。本题参数调用时是按地址传递，因此Sun过程中变量的值改变也即改变了单击事件中的a、b变量值。Suna，b的执行过程是：t=x=5,x=t/y=1.25，y=tMody=1。

相关内容