在窗体上面一个命令按钮Commandl和一个文本框Textl,然后编写下列程序： Private Sub Commandl_ClickO A=InputBox("请输入日期（1～31）") T="旅游景点："_ ﹠IIf(A>0And A ﹠IIf(A>10And A ﹠IIf(A>20And A Text1.Text=t End Sub程序运作后，如果从键盘输入5，则在文本框中显示的内容。A．旅游景点：长城 B. 旅游景点：长城颐和园C. 旅游景点：颐和园 D. 旅游景点：故宫

题目

在窗体上面一个命令按钮Commandl和一个文本框Textl,然后编写下列程序： Private Sub Commandl_ClickO A=InputBox("请输入日期（1～31）") T="旅游景点："_ ﹠IIf(A>0And A ﹠IIf(A>10And A ﹠IIf(A>20And A Text1.Text=t End Sub程序运作后，如果从键盘输入5，则在文本框中显示的内容。A．旅游景点：长城 B. 旅游景点：长城颐和园C. 旅游景点：颐和园 D. 旅游景点：故宫

相似考题

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

2.在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：程序运行后，单击命令按钮，在文本框中显示的值是__________。

3.若窗体中已有一个名为Commandl的命令按钮、一个名为Labell的标签和一个名为Textl的文本框，且文本框的内容光焕发为空，然后编写如下事件代码： Private Function fx As Long． As Boolean If x Mod 2 =0 Then f =True Else f =False End If End Function Privare Sub Commandl_Click． Dim n As Ling n =ValMeltextl． p=Iiffn．,”Even number”,”Odd number’ Me!Labell.Caption=n＆“is” ＆p End Sub 窗体打开运行后，在文本框中输入21，单击命令按钮，则标签显示内容为 【12】

4.在窗体上添加一个命令按钮(名为Commandl)，然后编写如下程序：打开窗体运行后，单击命令按钮，消息框的输出结果为__________。

更多“在窗体上面一个命令按钮Commandl和一个文本框Textl,然后编写下列程序: Private Sub Commandl_Cli ”相关问题

  • 第1题：

    在窗体中添加了一个文本框和一个命令按钮（名称分别为Textl和Commandl），并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为"Access模拟”。以下能实现上述操作的事件过程是（ ）。

    A.Private Sub Commandl．Click（ ） Caption=”Access模拟”Commandl．

    B.Private Sub Textl click（ ） Caption=”Access模拟”EndSubEndSub

    C.Private SUb Commandl Change（ ） Caption=”Access模拟”Commandl．

    D.Private Sub Textl_Change（ ） Caption=”Access模拟”End SubEnd Sub


    正确答案：D
    暂无解析，请参考用户分享笔记

  • 第2题：

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

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


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

  • 第3题：

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

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


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

  • 第4题：

    在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，并在命令按钮中编写如下事件代码：PrivateSubCommandlClick()m=17n=Len(Str$(m)+Sp2ace(5))Me!Text1=nEndSub打开窗体运行后，单击命令按钮，在文本框中显示______。

    A．5

    B．8

    C．9

    D．10


    正确答案：D

  • 第5题：

    在名为”Forml”的窗体上添加三个文本框和一个命令按钮，其名称分别为”Textl”、”Text2”、”Text3”和”Commandl”，然后编写如下两个事件过程：


    正确答案：
    510【解析】本题考查“ ”运算符的使用。“ ”运算符可以用于计算两个数之和，也可以使用“ ”运算符连接两个字符串，“ ”，运算符两端的表达式的基本类型决定了“ ”运算符所做的操作，如果两个表达式都是数值或者一个表达式是数值，另一个表达式是字符串，则“ ”代表相加；如果两个表达式都是字符串则“ ”代表字符串的连接。本题中，由于文本框的Text属性值的类型是字符串，所以“ ”运算符连接的是字符串…5和字符串“10”，所以本题答案为510。

  • 第6题：

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


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

相关内容