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

题目

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

A.15和1

B.27和3

C.195和3

D.600和4


相似考题
更多“在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮,然后编写如下事 ”相关问题
  • 第1题:

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

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


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

  • 第2题:

    在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?
    程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为:同学们,你们好。

  • 第3题:

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

    A.5和1

    B.195和3

    C.27和3

    D.600和4


    A

  • 第4题:

    在窗体上画两个文本框(其Name属性分别为Text1和Tex12)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程: 程序运行后,单击命令按钮,在两个文本框中显示的值分别为()。

    A10和0

    B2和100

    C3和50

    D4和168


    B

  • 第5题:

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

    A.600和4

    B.195和3

    C.5和1

    D.27和3


    A