(27)在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )Dim i As Integer, n As IntegerFor i=0 To 50i=i+3n=n+1If i>10 Then Exit ForNextText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是( )。A)2B)3C)4D)5

题目

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

程:

Private Sub Command1_Click( )

Dim i As Integer, n As Integer

For i=0 To 50

i=i+3

n=n+1

If i>10 Then Exit For

Next

Text1.Text=Str(n)

End Sub

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

A)2

B)3

C)4

D)5


相似考题
参考答案和解析
正确答案:B

(27)【答案】B)
【解析】本题考核点在于循环和判断语句,在循环起始于i=0,当i>10时终止。I的取值依次为0,3,7,11,相应的,n的取值为0,1,2,3。在给出的程序中,第一次执行完“i=i+3”后i的值为3,然后让n自加1,再执行依次“next I”后,i的值为4,因此第二次执行完”i=i+3”后i后的值为7;n再自加,值为2,此时的i的值并不大于10,因此还要再执行“i=i+3,”n=n+1”此时i值为11,n值为3。停止循环判断。
更多“(27)在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过 ”相关问题
  • 第1题:

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

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


    正确答案:12
    12 解析: 本题考查的是VBA编程基础、参数传递。由于VBA中,默认情况下,参数是按地址传递(ByRef),结果会返回。本题中z的值等于x+y,所以文本框中显示的内容为12。

  • 第2题:

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

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

    A.2

    B.3

    C.4

    D.5


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

  • 第3题:

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

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


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

  • 第4题:

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

    A. 30

    B. 25

    C. 20

    D. 15


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

  • 第5题:

    在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是

    A. Visual

    B.Basic

    C.Program

    D.出错


    正确答案:C
    解析:Text是文本框的默认属性。