在窗体上画一个命令按钮Command1和一个文本框Text1，然后编写如下程序： Private Sub Command1_Click() A=InputBox("请输入日期(1～31)") t="旅游景点:"_ & IIf(A＞0 And A＜=10, "长城"，"")_ & IIf(A＞10 And A＜=20，"故宫"，"")_ & IIf(A＞20 And A＜=30，"颐和园"，"") Text1.Text=t End Sub 程序运行后，如果从键盘输入5，则在文本框中显示的内容是( )。A．旅

题目

在窗体上画一个命令按钮Command1和一个文本框Text1，然后编写如下程序： Private Sub Command1_Click() A=InputBox("请输入日期(1～31)") t="旅游景点:"_ & IIf(A＞0 And A＜=10, "长城"，"")_ & IIf(A＞10 And A＜=20，"故宫"，"")_ & IIf(A＞20 And A＜=30，"颐和园"，"") Text1.Text=t End Sub 程序运行后，如果从键盘输入5，则在文本框中显示的内容是( )。

A．旅游景点：长城

B．旅游景点：长城颐和园

C．旅游景点：颐和园

D．旅游景点：故宫

相似考题

1.在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labell，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是 ______。A．27B．28C．29D．30

2.在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1)，然后编写如下事件过程：Private Sub Command1_Click()x＝Val(Text1.Text)Select Case xCase 1,3y＝x*xCase IS＞＝10,IS＜＝-10y＝xCase-10 To 10y＝-xEnd SelectEnd Sub程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。

3.在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。

4.在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labe11，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后，在文本框中输入653，单击命令按钮，标签中显示的内容是______。A．27B．28C．29D．30

参考答案和解析
正确答案：A
解析：InputBox函数用于产生一个输入对话框，等待用户输入字符或按下按钮，然后返回包含文本框内容的字符串；“”符号用于断行时连接两行中的字符串；“&”符号用于连接字符串；IIf(expr，truepart，falsepart)函数根据表达式expr的值，返回不同的值，如果expr为True，则返回truepart部分的值或表达式，如果expr为False，则返回falsepart部分的值或表达式。程序要求输入5，因为5在0和10之间，因此执行第1个IIf函数，返回“长城”。
更多“在窗体上画一个命令按钮Command1和一个文本框Text1,然后编写如下程序: Private Sub Command1_Cli ”相关问题

  • 第1题：

    在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：程序运行后，如果单击命令按钮，则在面体上显示的内容是（ ）。


    正确答案：A
    A)    【解析】本题考查循环嵌套程序分析。外层循环共执行2次，第一次执行外循环，内层循环变量为1到1，执行一次；第二次执行外循环，内层循环变量为1到2，执行2次。String 函数产生i个“Hello”中的第一个字符H。

  • 第2题：

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

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

    A．2

    B．3

    C．4

    D．5


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

  • 第3题：

    在窗体上画一个名称为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是文本框的默认属性。

  • 第4题：

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

    A. 30

    B. 25

    C. 20

    D. 15


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

  • 第5题：

    在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：

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

    A．

    B．H

    C．

    D．


    正确答案：A
    【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。

  • 第6题：

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

相关内容