窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是A)Private Sub Form. 1_Click() B)Private Sub Form. _Click()End Sub End SubC)Private Sub Commandl_Click() D)Private Sub Command_ Click()End Sub End Sub

题目

窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是

A)Private Sub Form. 1_Click() B)Private Sub Form. _Click()

End Sub End Sub

C)Private Sub Commandl_Click() D)Private Sub Command_ Click()

End Sub End Sub


相似考题
参考答案和解析
正确答案:B
更多“窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是A)Private ”相关问题
  • 第1题:

    在窗体上画一个名称为 \"Command1\" 的命令按钮,然后编写如下事件过程:

    Private Sub Command1_Click()

    Dim a As String

    A="123456789"

    For i=1 To 5

    Print Space(6-i);Mid $ (a,______ ,2*i-1)

    Next i

    End Sub

    程序运行后,单击命令按钮,窗体上的输出结果是

    5

    456

    34567

    2345678

    123456789

    请填空。


    正确答案:
    6-i
    MiD $( 字符串,起始位置 \[ ,个数 \]) 函数用于取出字符串从指定位置开始的含指定个数字符的字符串。本题 MiD $ 的作用在于依次取出字符串居中位置的 1 、 3 、 5 、 7 、 9 个字符。故取字符串起始位置为 6-i ,即依次为 5 、 4 、 3 、 2 、 1 。

  • 第2题:

    ( 13 )设在名称为 Myform. 的窗体上只有 1 个名称为 C1 的命令按钮 , 下面叙述中正确的是( )

    A )窗体的 Click 事件过程的过程名是 Myform_Click

    B )命令按钮的 Click 事件过程名是 C1_Click

    C )命令按钮的 Click 事件过程的过程名是 Command1_Click

    D) 上述 3 种名称读市错误的


    正确答案:B

  • 第3题:

    ( 13 )设在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。要求单击 Command 1

    按钮时可把光标移到文本框中。下面正确的事件过程是

    A ) Private Sub Command1_Click()

    Text1.GotFocus

    End Sub

    B ) Private Sub

    Command1.GotFocus

    EndSub

    C ) Private Sub Command1_Click()

    Text1.SetFocus

    End Sub

    D ) Private Sub

    Command1.SetFocus

    End Sub


    正确答案:C

  • 第4题:

    在窗体上有一个命令按钮Command1,编写事件代码如下:

    Private Sub Command1_Click()

    Dim a(10),P(3) As Integer

    k=5

    For i=1 To 10

    For i=1 To 3

    For i=1 To 3

    End Sub

    打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。


    正确答案:201
    201 解析: 本题考查的是VBA编程基础。经过第一个for循环,a(i)中a(1)~a(10)存的分别是1~10的平方。第二个循环后,p(i)中的p(1)存的是a(1)的值,p(2)中存的是a(4)的值,p(3)中存的是a(9)的值,经过最后一个循环之后,k的值应该为201。

  • 第5题:

    窗体上有一个命令按钮,命令按钮的单击事件过程如下: Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next Print S End Sub 运行程序后,单击命令按钮,输出结果是

    A.10

    B.14

    C.15

    D.120


    正确答案:B
    解析:考查考生对数组定义的掌握程度。
      [解题要点] Array函数在默认的情况下,数组的下标从O开始,所以s=a(1)+a(2)+a(3)a(4)=2+3+4+5=14
      [考点链接] 数组的定义、赋值和应用。

  • 第6题:

    窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是

    A.Private Sub Forml_Click() … End Sub

    B.Private Sub Form_Click() … End Sub

    C.Private Sub Commandl_Click() … End Sub

    D.Private Sub Command_Click() … End Sub


    正确答案:B

  • 第7题:

    在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是

    A.VVV

    B.Vis

    C.sic

    D.11


    正确答案:A
    解析:本题考查字符串函数。 String返回n个字符。如果为字符串,则返回n个字符串的首字符。据此,本题的正确答案为A,即返回3个“Visual Basic”的首字母“V”。

  • 第8题:

    在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:

    Private Sub Command1_Click()

    Dim a()

    a=Array("机床","车床","钻床","轴承")

    Print a(2)

    End Sub

    程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.机床

    B.车床

    C.钻床

    D.轴承


    正确答案:C
    解析:本题考查VBA中数组的知识。数组变量由变量名和数组下标构成,我们通常使用Dim语句来定义数组,其中下标下限缺省值为0。本题中的a(2)就是数组的第三个元素即“钻床”。

  • 第9题:

    在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后,单击命令按钮,在窗体上输出的是______。

    A.49

    B.64

    C.81

    D.100


    正确答案:C

  • 第10题:

    在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:

    Private Sub Command1_Cilck()

    End Sub

    运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是( )。


    正确答案:hardware
    hardware

  • 第11题:

    在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是

    A. 123.45

    B.12345.00

    C.12345

    D.00123.45


    正确答案:B
    解析:对于符号“0”,实际数字小于符号位数时,数字前后加0;大于时,若要显示数值表达式的整数部分位数多于格式字符串的位数,按实际数值显示。若小数部分的位数多于格式字符串的位数,按四舍五入显示。

  • 第12题:

    单选题
    窗体上有一个名称为Command1的命令按钮,事件过程如下:运行程序,并单击命令按钮,窗体上显示的内容为(  )。
    A

    -4

    B

    -3

    C

    3

    D

    3.6


    正确答案: B
    解析:
    Sgn函数返回参数的符号,参数为负数时返回-1,为0时,返回0,为正数时返回1。所以sgn(-3.6)返回-1。Visual Basic中把任何非0值都认为是真,以0表示假,因此If句中将执行n=Int(m)语句。Int函数返回不大于参数的最大整数,Int(-3.6)要返回小于-3.6的整数即是-4,因此n=-4。

  • 第13题:

    工程中有两个窗体,名称分别为Form1、Form2,Fonn1为启动窗体,该窗体上有命令按钮 Command1。要求程序运行后单击该命令按钮时显示Form2,则按钮Click事件过程应该是 ______。

    A.Private Sub Command1_click() Foma2.Show End Sub

    B.Private Sub Command1_Click() Form2.Visible End Sub

    C.Private Sub Command1_Click() Load Form2 End Sub

    D.Private Sub Command1_click() Form.Load EndSub


    正确答案:A
    解析:Show方法用来显示一个窗体。格式:窗体名称.Show[模式],参数“模式”用来确定显示窗体的状态,可以取值0或1。取值为0(0值是缺省值)则窗体是“无模式”窗体,当该窗体显示出来时,不但可以对该窗体进行操作,还可以对其他显示出来的窗体进行操作:取值为1则窗体是“模式”窗体,当该窗体显示出来时,只能对该窗体进行操作,只有当该窗体关闭后,才能对其他窗体进行操作。

  • 第14题:

    在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。

    A.VVV

    B.Vis

    C.sic

    D.11


    正确答案:A
    解析:函数string(n,字符串)的功能是返回由n个指定“字符串”中第一个字符组成的字符串。本题中的字符串“VisualBasic”的第一个字符为“V”,所以返回3个“V”,即String函数返回的字符为“VVV”。

  • 第15题:

    窗体上有一个命令按钮Command1,编写如下事件过程:

    Private Sub Command1_Click()

    x = InputBox("x=")

    y = InputBox("y=")

    Print x + y

    End Sub

    运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。

    A、 444

    B、 123321

    C、 123+321

    D、 出错信息


    正确答案:B

  • 第16题:

    窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是( )。

    A.Private Sub Form1 Click( )

    End Sub···

    B.Private Sub Form1. Click( )

    End Sub···

    C.Private Sub Command1 click( )

    End Sub···

    D.Private Sub Command Click( )

    End Sub···


    正确答案:B
    B。【解析】窗体单击事件为Form—Click事件。

  • 第17题:

    在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) a=12345 Print Format $(a,"000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是

    A.123.45

    B.12345.00

    C.12345

    D.00123.45


    正确答案:B
    解析:解题的关键是掌握对格式说明字符的理解。0表示一个数字位,0的个数决定了显示区段的长度,多余的位以0补齐;小数点与O结合使用,可以放在显示区段的任何位置,根据格式字符串的位置,小数部分多余的数字按四舍五入处理。由于本题中变量a为12345,并没有涉及小数,故可以直接在其后补两个0。

  • 第18题:

    窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是( )。

    A.控制流

    B.数据流

    C.模块调用

    D.事件驱动


    正确答案:B
    B)【解析】窗体的单击事件不同于其他控件的单击事件,在事件过程头中不出现窗体名字,而是统一使用Form.Click。

  • 第19题:

    窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是( )。


    正确答案:C
    B)    【解析】窗体的单击事件不同于其他控件的单击事件,在事件过程头中不出现窗体名字,而是统一使用Form. Click0。

  • 第20题:

    在窗体上有一个标签Lb1和一个命令按钮Command1,事件代码如下: Option Compare Database Dim a As String * 10 Private Sub Command1_Click( ) a="1234" b=Len(a) Me. Lb1. Caption=b End Sub 打开窗体后单击命令按钮,窗体中显示的内容是( )。

    A.4

    B.5

    C.10

    D.40


    正确答案:C
    解析:首先定义a为字符串类型,长度为10,当单击命令按钮后将a的长度值赋予b,并且将b的值10通过标签显示出来。

  • 第21题:

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

    Private Sub Command1_Cliek

    Dim b, k

    For k = 1 to 6

    b=23+k

    Next k

    MsgBox b + k

    End Sub

    打开窗体后,单击命令按钮,消息框的输出结果是【 】。


    正确答案:51
    51 解析:本题循环内部完成b=231+2+3+4+5+6的操作,当k=7时,结束循环,故消息框中显示的是51。

  • 第22题:

    在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>0 Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。

    A.15

    B.18

    C.21

    D.24


    正确答案:C
    解析:本题考查的是For...Next循环语句。For...Next循环执行时,先将初始值赋给循环变量,判断是否超过终值,若未超过则执行循环体,遇到Next语句后,循环变量增加一个步长(默认值为1),再判断是否超过终值,若未超过则继续执行循环体,如此重复直到循环变量超过终值,退出循环。本题中的循环变量为n,步长为1,当n=20时,再执行Next n,则n=21,此时n大于终值20,退出循环。

  • 第23题:

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

    Private Sub Command1_Click ()

    Dim b,k

    For k=1 to 6

    b=23+k

    Next k

    MsgBox b+k

    End Sub

    打开窗体后,单击命令按钮,消息框的输出结果是 【 15 】 。


    正确答案: