在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl),然后编写如下事件过程:程序运行后,在文本框中输入3,然后单击命令按钮,则Y的值变为__________。

题目

在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl),然后编写如下事件过程:

程序运行后,在文本框中输入3,然后单击命令按钮,则Y的值变为__________。


相似考题
更多“ 在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl),然后编写如下事件过程:程序运行后,在文本框中输入3,然后单击命令按钮,则Y的值变为__________。 ”相关问题
  • 第1题:

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

    程序运行后,单击命令按钮,其输出结果为__________。


    正确答案:
    9【解析】本题考查VBA中程序设计的知识。对于这个问题,首先注意到循环的次数为6次;然后注意到循环内的两个If语句为顺序关系而不是嵌套关系,第一个If语句只有第一次循环时才会满足;第一次循环时首先执行第一个If语句把x赋值为1,然后执行第二个If语句;以后各次循环均照此分析,前4次循环x自加l,后两次循环X自加2,最后输出结果为9。

  • 第2题:

    在窗体上画两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:

    Private Sub Command1_Click()

    Text 1="VB programming"

    Text 2=Text 1

    Text 1="ABCD"

    End Sub

    程序运行后,单击命令按钮,文本框Text 2中显示的内容为【 】。


    正确答案:VB programming
    VB programming 解析:本段程序是先把“VB programming”赋给Text 1,然后在把Text 1的内容赋给Text 2,最后把“ABCD”赋给Text 1。所以最后Text 1中的内容是“ABCD”,而Text 2中的内容是“VB programming”。

  • 第3题:

    在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:

    程序运行后,单击命令按钮,在文本框中显示的值是__________。


    正确答案:
    30【解析】本题考查VBA中二维数组和循环的知识。本题属于比较简单的问题,使用了二重循环为二维数组进行了部分赋值,最后求两个数组元素值并求和,注意这两个元素是否已被赋值,若没有赋值则为0。本题中对于a(2,3)赋值为2*3也就是6,a(4,6)赋值为4*6也就是24,最后的结果为6 24=30。

  • 第4题:

    在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A. 机床

    B. 车床

    C. 钻床

    D. 轴承


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

  • 第5题:

    在窗体上画一个名称为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”。

  • 第6题:

    在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Dim arrayl(10,10)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=2 To 4 array l(i,j)=i+j Next j Next i Text1.Text=arrayl(2,3)+arrayl(3,4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是______。

    A. 12

    B.13

    C.14

    D.15


    正确答案:A
    解析:本题是通过一个For循环来给数组赋值。由array1(i,j)=i+j可知,arrayl(2,3)=2+3=5,arrayl(3,4)=3+4=7, arrayl(2,3)+arrayl(3,4)=5+7=12,即文本框中的值为12。

  • 第7题:

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

    A.VVV

    B.Vis

    C.sic

    D.11


    正确答案:A

  • 第8题:

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

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

    A)机床

    B)车床

    C)钻床

    D)轴承


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

  • 第9题:

    在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Forn=1 To 20 If n Mod 3<>Thenm=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时,再执行Nextn,则n=21,此时n大于终值20,退出循环。

  • 第10题:

    在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl),编写如下事件过程:

    打开窗体运行后,单击命令按钮,文本框中显示的内容是__________。


    正确答案:
    15【解析】本题考查函数调用中参数传递的知识。在VBA的函数调用时,参数有两种传递方式:传址传递和传值传递。如果在函数声明时没有说明传递类型,则默认为传址传递,即形参的结果会传递给实参。本题中形参均为传址传递,即a=x=3,b=y=5,c=z=10。但是在子程序里面对c重新赋值为c=a*b=15,这个值l5会回送给实参2,所以最后显示的值Z也就是l5。

  • 第11题:

    "在窗体上放入一个名称为Button1命令按钮和1个名称为TextBox1文本框,然后编写如下事件过程: 程序运行后,如果单击命令按钮,则在文本框中显示的内容是()
    570

  • 第12题:

    单选题
    在窗体上画一个文本框,然后编写如下事件过程:程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为(  )。
    A

    123

    B

    456

    C

    579

    D

    123456


    正确答案: D
    解析:
    InputBox函数返回的是字符型内容,文本框的Text属性也是字符型,所以两个字符型变量进行“+”运算实际上是将两个字符串连接起来。在窗体上显示内容为“123456”。

  • 第13题:

    在窗体上画一个命令按钮(名称为 Commandl),然后编写如下事件过程: Private Sub Commandl_Click() Static a As Integer a=a+1 End Sub 运行程序,第3次单击命令按钮后,变量a的值为( )

    A.0

    B.1

    C.2

    D.3


    正确答案:D
    解析:由Static语句定义的变量只建立一次,能在过程结束后保存原值。题中第一次单击命令按扭时,a的初始值为o,执行语句后a的值变为1;在第二次单击按扭时,a的初始值应保留上次的结果值1,执行语句后 a的值变为2;同理在第三次单击按扭后,变量 a的值变为3。

  • 第14题:

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

    程序运行后,单击命令按钮,消息框输出的是系统当前日期和当前时间。


    正确答案:
    72【解析】本题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值,最后求两个数组元素值的积。我们只需要注意这两个数组元素在循环中被赋了什么值,当i=3,j=3时,al(3,3)=3 3=6,a2(3,3)=al(3,3) 3 3=12,所以最后二者之积为72。

  • 第15题:

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

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


    正确答案:
    hardware【解析】本题考查消息框的知识。使用MsgBox函数来弹出消息框,此函数的使用格式为:MsgBox(prompt[,buttons][,title][,helpfile,context])其中第一个参数是显示在对话框中的消息,第二个参数是按钮的数目及形式,第三个参数是对话框标题栏显示的字符串,后面的是帮助文件以及帮助上下文编号。第一个参数必需有,其余参数可省略,但是若中间若干个参数省略时不能省略逗号分隔符。本题中第三个参数是变量b,即hardware。

  • 第16题:

    在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1),然后编写如下事件过程:

    Private Sub Command1_Click()

    x=Val(Text1.Text)

    Select Case x

    Case 1,3

    y=x*x

    Case IS>=10,IS<=-10

    y=x

    Case-10 To 10

    y=-x

    End Select

    End Sub

    程序运行后,在文本框中输入3,然后单击命令按钮,则y的值变为______。


    正确答案:9
    9 解析:本题考查多分支语句Select Case的知识。 Select Case用于实现多分支结构,其使用格式为: Select Case 测试表达式>
    [Case表达式列表1>]
    [语句块1]
    [Case 表达式列表2>]
    [语句块2]
    [CaseElse]
    [语句块n]
    End Select
    其功能是根据“测试表达式”的值,从多个语句块中选择符合条件的一个语句块执行。如果测试表达式的值等于某一个表达式的值,则选择该语句块的语句执行,执行完毕后退出Case结构。本题中由于x的值为3,符合第一个Case语句的条件,所以执行严y=x*x后退出Case结构,最后y的值为9。

  • 第17题:

    设有如下通用过程:在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如 下事件过程:End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。

    A. 30

    B. 25

    C. 20

    D. 15


    正确答案:A
    A)    【解析】本题考查函数的参数。数组作为参数进行传递时,VB中默认的参数传递方式为地址传递。过程Fun的功能是计算数组中所有元素的积。数组的元素为2 4 6 8 10,因此最后文本框中显示的内容为30。

  • 第18题:

    在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:

    程序运行后,单击命令按钮,在文本框中显示的值是

    A.2

    B.3

    C.4

    D.5


    正确答案:B
    题只能计算当i>1所循环的次数。注意i在循环体内被强行加3,到For循环时.还要再加步长1,这相当于因此,n=3。选择B。

  • 第19题:

    在窗体上画两个名称为Text l、Text 2的文本框和一个名称为Command l的命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim x As Integer,n As Integer x=1 n=0 Do While x<20 x=x*3 n=n+l Loop Textl.Text=Str(x) Text2.Text-Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是( )。

    A.9和2

    B.27和3

    C.195和3

    D.600和4


    正确答案:B
    解析:本题考查While循环的处理过程。循环第1次x=l,执行循环,n=l;循环第2次, x=3,仍然执行循环,n:2;依次类推,当执行完第3次循环后,x=27>20,n=3,不再满足条件,跳出循环,答案为B。

  • 第20题:

    在窗体上画一个名称为Commandl的命令按钮和两个名称分别为Textl、Text2的文本框,然后编写如下事件过程: PrivateSubCommandl_Click() n=Textl.Text Select Case n Case 1 To 20 x=10 Case2,4,6 x=20 Case Is<10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是______。

    A.10

    B.20

    C.30

    D.40


    正确答案:A
    解析:SelectCase执行时,首先计算SelectCase语句中的测试表达式的值,然后从第一个Case开始找满足该.值的Case语句;遇到第一个表达式列表值与测试表达式相匹配的Case语句,则执行其后的语句序列,然后跳出SelectCase结构.而本题第一个语句就满足条件,所以执行第一条语句,结果为x=10。

  • 第21题:

    在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序:

    窗体打开运行后,单击命令按钮,则消息框的输出结果为__________。


    正确答案:
    2500【解析】本题考查循环的知识。这个问题比较简单,实际上就是求l到100之间的奇数和,最终结果为2500。

  • 第22题:

    在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl),然后编写如下事件过程:


    正确答案:
    15【解析】本题考查VBA程序中过程调用的知识。由于VBA中,默认情况下,参数是按地址传递(ByRef),对形参的改变会影响到实参。本题中2的值等于a b,这个z值会返回给实参c,所以文本框中显示的内容为15。

  • 第23题:

    单选题
    在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:程序运行后,在文本框中输入456,然后单击命令按钮,在输入对话框中输入123,则文本框中显示的内容是(  )。
    A

    579

    B

    123

    C

    456123

    D

    456


    正确答案: C
    解析:
    默认情况下,InputBox的返回值是一个字符串,因此程序中a="123",b="456",b+a="456"+"123"="456123"。使用字符连接运算符“+”时,如果连接的是字符串和数值,可根据返回值类型判断,若返回值类型为字符串,则它将数值转换成字符串后与另一字符串连接成新字符串返回;若返回值类型为数值,则它要求字符串中只能包含数字,而不能有其他字符,否则报“类型不匹配”的错误。