itgle.com

下列程序，当单击窗体时s的值是( )Private Sub Form_Click()Dim s as booleana = 2: b = 3: c = 4: d = 5s = a >b And 2 * a >c Or cPrint sEnd SubA.TRUEB.FALSEC.-1D.1

题目

下列程序，当单击窗体时s的值是( )

Private Sub Form_Click()

Dim s as boolean

a = 2: b = 3: c = 4: d = 5

s = a >b And 2 * a >c Or c<= d

Print s

End Sub

A.TRUE

B.FALSE

C.-1

D.1

相似考题

1.（ 18 ）在程序运行时，下面的叙述中正确的是A ）用鼠标右键单击窗体中无控件的部分，会执行窗体的 Form_Load 事件过程B ）用鼠标左键单击窗体的标题栏，会执行窗体的 Form_Click 事件过程C ）只装入而不显示窗体，也会执行窗体的 Form_Load 事件过程D ）装入窗体后，每次显示该窗体时，都会执行窗体的 Form_Click 事件过程

2.下列程序，当单击窗体时s的值是( )Private Sub Form_Click()s = 11 \ 3 + 11 Mod 3Print sEnd SubA.3B.4C.5D.6

3.下列程序，当单击窗体时s的值是( )Private Sub Form_Click()Dim s As Integers = Not 2 * 5Print sEnd SubA. TrueB. FalseC.1D.0

4.运行下列程序，单击窗体后输出的结果是( )。Private Sub Form_Click()Dim aDim s As Integer, i As Integera = Array(1, 2, 3, 4, 5, 6)s = 1For i = 5 To 1 Step -2s = s * a(i)Next iPrint sEnd SubA、 15B、 48C、 120D、 720

参考答案和解析
正确答案：A
更多“下列程序,当单击窗体时s的值是( )Private Sub Form_Click()Dim s as booleana = 2: b = 3: c ”相关问题

  • 第1题：

    在程序运行时，下面的叙述中正确的是

    A．用鼠标右键单击窗体中无控件的部分，会执行窗体的Form. L0ad事件过程

    B．用鼠标左键单击窗体的标题栏，会执行窗体的Form_Click事件过程

    C．只装入而不显示窗体，也会执行窗体的Form. Load事件过程

    D．装入窗体后，每次显示该窗体时，都会执行窗体的Form_Click事件过程


    正确答案：C
    解析：当加载窗体时，系统自动触发该窗体的Load事件；当窗体成为一个活动窗口时，触发Activate事件；单击窗体空白处时，会触发窗体Click事件；选项A)触发的是Form_Click事件；选项B)用鼠标左键单击窗体的标题栏，不会触发Form_Click事件过程；选项D)触发的是Form_Activate事件过程。所以正确答案为C)。

  • 第2题：

    程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End Sub

    A．32

    B．28

    C．30

    D．36


    正确答案：A
    解析：当发生Command1_click事件时，将定义一个4行4列的数组aa(数组下标从0开始)，然后通过一个两层For循环给它的各个元素赋值，赋值规律是给每一个元素赋它的行下标值乘以4，再加上列下标值再加1。然后通过一个For循环把数组元素aa(0，1)、aa(1，1)、aa(2，1)和aa(3，1)的值2、6、10、14加到s中，s的值为32。

  • 第3题：

    运行下列程序：

    Private Sub form_Click( )

    x = 8: y = 2

    Call fun1((x), y)

    Print x, y

    End Sub

    Private Sub fun1(x, y)

    s = x

    x = s / y

    y = s Mod y

    End Sub

    单击窗体后，则在窗体上显示的结果是( )。

    A.4 2

    B.8 2

    C.8 0

    D.2 4


    正确答案：C

  • 第4题：

    窗体上命令按钮Commandl的事件过程如下：

    Private Sub Command1_Click()

    Dim total As Integer

    total=s(1)+s(2)

    Print total

    End Sub

    Private Function s(m As Integer)As Integer

    Static x As Integer

    For i=1 To m

    x=x+1

    Next i

    s=x

    End Function

    运行程序，第3次单击命令按钮Command1时，输出结果为【 】。


    正确答案：16
    16 解析：本题考查的考点是有关静态变量的。静态变量定义后默认值为o，并且会保存上一次为这个变量赋的值。本题第一次单击命令按钮时，调用两次s函数，第一次使得x的值为1，第二次使得x的值为3；第二次单击命令按钮时，调用两次s函数，第一次使得x的值为4，第二次使得x的值为6：第三次单击命令按钮时，调用两次s函数，第一次使得x的值为7，第二次使得x的值为9，最后结果为7+9=16。

  • 第5题：

    运行下列程序:Private Sub Command1_Click( )Dim s1 As String * 1Dim s2 As Strings1 = &quo

    运行下列程序：

    Private Sub Command1_Click( )

    Dim s1 As String * 1

    Dim s2 As String

    s1 = "a"

    For i = Asc(s1) To Asc(s1) + 4

    s2 = s2 & Chr(i)

    Next i

    Print s2

    End Sub

    单击Command1命令按钮后，则在窗体上显示的结果是( )。

    A.a

    B.abcde

    C.aaaa

    D.s2


    正确答案：B

相关内容