niusouti.com

在窗体上画两个文本框(其名称分别为Textl和Text2)和一个命令按钮(其名称为 Command1),然后编写如下两个事件过程: Private Sub Command1_Click() Text1.Text="Microsoft Visual Basic" End Sub Private Sub Text1_Change() TextText=UCase(Text1.Text) End Sub 程序运行后,单击命令按钮,则在Text2文本框中显示的内容是A.Microsoft Visual Basic

题目

在窗体上画两个文本框(其名称分别为Textl和Text2)和一个命令按钮(其名称为 Command1),然后编写如下两个事件过程: Private Sub Command1_Click() Text1.Text="Microsoft Visual Basic" End Sub Private Sub Text1_Change() TextText=UCase(Text1.Text) End Sub 程序运行后,单击命令按钮,则在Text2文本框中显示的内容是

A.Microsoft Visual Basic

B.microsoft visual basic

C.MICROSOFT VISUAL BASIC

D.空字符串


相似考题
更多“在窗体上画两个文本框(其名称分别为Textl和Text2)和一个命令按钮(其名称为 Command1),然后编写如 ”相关问题
  • 第1题:

    请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。

    1.在窗体(名称为Form1)上画两个命令按钮,其名称分别为C1和C2,标题分别为“命令按钮1”和“命令按钮2”,编写适当的事件过程。程序运行后,“命令按钮2”隐藏,此时如果单击“命令按钮1”,则“命令按钮2”出现,“命令按钮1”隐藏;而如果单击“命令按钮2”,则“命令按钮1”出现,“命令按钮2”隐藏。程序的运行情况如图1—1所示。注意;存盘时,工程文件名为sjt1.vbp.窗体文件名为sjt1.frm。

    2.在Form1的窗体上画一个命令按钮,其名称为C1,标题为“显示”;再画一个文本框,其名称为Text1,编写适当的事件过程。程序运行后,在窗体加载时使文本框不可见,如果双击窗体,则文本框出现;此时如果单击命令按钮,则在文本框中显示“等级考试”。程序运行情况如图1—2所示。

  • 第2题:

    在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Textl、Labell和 Commandl,然后编写如下两个事件过程: Prirate SUb Command1 Click() strText = InputBox(“请输入”) Textl.Text = strText End Sub Private Sub Text1 Change() Labell.Caption = Right(Trim(Text1.Text), 3) End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是

    A.空

    B.abcdef

    C.abc

    D.def


    正确答案:D
    解析:本题考查字符串函数。Trim表示去掉字符串两边的空白字符。Right函数返回字符串最后面的n个字符。本题首先通过InputBox函数输入一个字符串并赋给strText,然后把strText赋给Textl.Text。再经过Trim函数和Right函数的计算,得出的结果应该是abcdef的最后三个字符def,故正确答案为D。

  • 第3题:

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

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


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

  • 第4题:

    在窗体上画两个名称为Tcxt1、Text2的文本框和一个名称为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 +l Loop Text1.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=1,执行循环,n=1;循环第2次, x=3,仍然执行循环,n=2 依次类推,当执行完第3次循环后,x=27>20,n=3,不再满足条件,跳出循环,由此可知本题答案为选项B。

  • 第5题:

    在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:

    A. 1和0

    B. 2和72

    C. 3和50

    D. 4和168


    正确答案:B
    B) 【解析】本题考察do while循环语句。第一次循环:x=0,执行循环体x=(x+2)+(x+3)=6、n=n+1=1;第二次循环:x=6,执行循环体x=(x+2)+(X+3)=72、n-ma+1=2;此时x大于50了,因此退出循环。所以两个文本框中显示的值分别为2和72。

  • 第6题:

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

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

    A.2

    B.3

    C.4

    D.5


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

  • 第7题:

    在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text 1、Text2,然后编写如下程序:PrivateSubCommand1_Click()a=Text1.textb=Text2.textC=Lcase( )D=Ucase( )PrintC;DEndSub程序运行后,在文本框Text 1、Text2中分别输入AbC和Efg,结果是( )

    A、abcEFG

    B.abcefg

    C.ABCefg

    D.ABCEFG


    正确答案:A

  • 第8题:

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

  • 第9题:

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

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


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

  • 第10题:

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

    A10和0

    B2和100

    C3和50

    D4和168


    B

  • 第11题:

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

  • 第12题:

    单选题
    在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:程序运行后,如果在文本框Text1中输入China Beijing,则在文本框Text2中显示的内容是(  )。
    A

    China Beijing

    B

    China

    C

    Beijing

    D

    ChinaB


    正确答案: A
    解析:
    程序运行后,在文本框Text1中输入字符后,会触发它的Change事件,通过中部截取函数Mid把文本框Text1中的内容从第6个字符“B”开始截取后面的字符,得到“Beijing”字符串,然后把截取的字符串在Text2中显示出来。

  • 第13题:

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

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


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

  • 第14题:

    在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Textl、Labell和Command1,然后编写如下两个事件过程:

    Private Sub Commandl_Click()

    S$=InputBox(”请输入一个字符串”)

    Textl.Text=S$

    End Sub

    Private Sub Textl Change()

    Label1.Caption=UCase(Mid(Text1.Text,7))

    End Sub

    程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“VisualBasic”,则在标签中显示的内容是【 】。


    正确答案:BASIC
    BASIC 解析:MID返回文本字符串中从指定位置开始的特定数目的字符,其格式为:MID(text,start num,hum—chars),Text包含要提取字符的文本字符串。Start—num文本中要提取的第一个字符的位置。因此,本题是要截取“VisualBasic”从第7个字符起右侧的所有字符。UCase函数将小写字母转换为大写字母。

  • 第15题:

    在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:

    Private Sub Command1 Click()

    Text3=Text1+Text2

    End Sub

    Private Sub Forml Load()

    Text1=""

    Text2=""

    Text3=""

    End Sub

    打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。


    正确答案:57
    57 解析:本题考查对“+”的理解。在VBA中,“+”既可以用作数学运算符,也可以用来连接字符串。题目程序实现将两个文本框中字符串进行连接,然后在第3个文本框中显示,所以应该是57,在连接字符串方面,“+”和“&”是相同的功能,但“&”只能用来连接字符串,而不能进行数学运算。命令按钮 Command1的Click事件是:Text3=Text1-1-Text2是将文本框Text1和Text2的内容进行连接后显示在Text3文本框中,窗体Form1的Load事件是将3个文本框的内容清空。当在文本框中输入内容后,单击命令按钮来触发其Click事件,完成两个字符串的连接。

  • 第16题:

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

    A. 30

    B. 25

    C. 20

    D. 15


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

  • 第17题:

    在窗体上画两个文本框(其名称分别为Text1和Text2)和一个命令按钮(其名称为 Commandl),然后编写如下两个事件过程: Private Sub Command1_Click() Text1.Text = "Computer Rank Examination" End Sub Private Sub Text1_Change() Text2.Text = UCase(Text1.Text) End Sub程序运行后,单击命令按钮,则在Text2文本框中显示的内容是______。

    A.Computer Rank Examination

    B.computer rank examination

    C.COMPUTER RANK EXAMINATION

    D.空字符串


    正确答案:C

  • 第18题:

    在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Textl和Text2,初始内容均为空)和一个命令按钮(名称为Command1,标题为“显示”)。然后编写命令按钮的Click事件过程。程序运行后,在两个文本框中分别输人姓名和年龄,然后单击“显示”按钮,则在窗体上显示两个文本框中的内容,如图所示。要求程序中不得使用任何变量。

    注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjtl.vbp,窗体文件名保存为sjtl.frm。


    正确答案:

    【考点分析】本题考点有:标签的Name和Caption属性、文本框Name和Text属性、命令按钮的Name和Caption属性、“&”和“+”运算符以及Print方法。
    【解题思路】通过标签的Name和Caption属性设置标签的名称和标题,通过文本框Name和Text属性设置文本框的名称和文本,通过命令按钮的Name和Caption属性设置命令按钮的名称和标题,“&”和“+”运算符均可将两个表达式作为字符串连接。在窗体上输出文本内容可使用Print方法。
    【操作步骤】
    步骤1:新建一个窗体,按照题目要求建立控件并设置相应属性,程序中用到的控件及属性如表3.16所示。


    步骤2:打开代码编辑窗口,在指定位置编写如下代码。
    参考答案
    Private Sub Command1_Click()
    Form1.Print Text1.Text&",现年"&
    Text2.Text&"岁"
    End Sub
    步骤3:调试并运行程序,关闭程序后按题目要求存盘。

  • 第19题:

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

    A.1和0

    B.2和72

    C.3和50

    D.4和168


    正确答案:B
    B。【解析】DoWhileUntil…Loop循环语句的执行过程是:如果条件为真(True),则执行语句块,当执行到Loop语句时,将返回到While语句并对“条件”再次进行判断,如仍为真(True),则重复前述过程;如果条件为假(False),则不执行语句块,而执行Loop之后的语句。本题第1次执行循环体后,x、n的值分别为6和1,第2次执行循环体后,x、n的值分别为72和2,此时While语句“条件”为假,将n、x的值在文本框中显示。

  • 第20题:

    在窗体上画1个命令按钮和1个文本框,其名称分别为Commandl和Textl,然后编写如下代码:

    Dim Save All As String

    Private Sub Commandl_C1iCk()

    Text1.Text=Left(UCase(SaveAU),4)

    End Sub

    Private Sub Textl_KeyPress(KeyAscii As Intege)

    SaveA11=Save All+Chr(KeyAscii)

    End Sub

    程序


    正确答案:ABCD
    ABCD

  • 第21题:

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


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

  • 第22题:

    在窗体上画两个文本框,(其Name 属性分别为Text1和Text2)和一个命令按纽(其Name属性为Command1),然后编写如下事件过程()

    A1和0

    B2和72

    C3和50

    D4和168


    B

  • 第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"。使用字符连接运算符“+”时,如果连接的是字符串和数值,可根据返回值类型判断,若返回值类型为字符串,则它将数值转换成字符串后与另一字符串连接成新字符串返回;若返回值类型为数值,则它要求字符串中只能包含数字,而不能有其他字符,否则报“类型不匹配”的错误。