单选题在窗体上画一个组合框、一个命令按钮和一个文本框,其名称分别为Combo1,Command1和Text1,然后编写如下事件过程:程序运行后,如果单击命令按钮,则在文本框中显示组合框的项目“CCCCC”。为了实现该操作,在命令按钮的Click事件过程中应使用的语句为(  )。A Text1.Text=Combo1.List(2)B Text1.Text=Combo1.TextC Text1.Text=Combo1.List(3)D Text1.Text=Combo1.ListIndex

题目
单选题
在窗体上画一个组合框、一个命令按钮和一个文本框,其名称分别为Combo1,Command1和Text1,然后编写如下事件过程:程序运行后,如果单击命令按钮,则在文本框中显示组合框的项目“CCCCC”。为了实现该操作,在命令按钮的Click事件过程中应使用的语句为(  )。
A

Text1.Text=Combo1.List(2)

B

Text1.Text=Combo1.Text

C

Text1.Text=Combo1.List(3)

D

Text1.Text=Combo1.ListIndex

参考答案和解析
正确答案: B
解析:
List属性可以返回组合框中各选项的内容,用下标来区分各选项,第l个选项下标为0,依此类推。AC两项,“CCCCC”为组合框中第3个选项,可以用Combo1.List(2)返回选项内容。B项,Text属性返回的是组合框中选中项目的内容;D项,ListIndex属性返回的是选中项目的索引值,即下标。
如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

(6)在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为 Text1、Label1 和 Command1,然

后编写如下两个事件过程:

Private Sub Command1_Click( )

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

Text1.Text=S$

End Sub

Private Sub Text1_Change( )

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

End Sub

程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“VisualBasic”,

则在标签中显示的内容是 【6】 。


正确答案:

(6)【答案】BASIC
【解析】Mid返回文本字符串中从指定位置开始的特定数目的字符,其格式为:Mid(text,start_num mum_chars).其中Test包含要提取字符的文本字符串。Start_num则表示文本是要提取的第一个字符的位置。,因此,本题是要截取“VisualBasic”从第7个字符起右侧的所有字符。UCase函数则将小写字母转换为大写字母。

第2题:

在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码:Private sub Command1_Click() Text1.text="AB"End SubPrivate Sub Command2_Click() Text1.Text="CD"End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示 。A.AB B.CD C.ABCD D.CDAB


正确答案:B
【解析】本题意在考查考生对文本框Text的理解。当单击Command1时,Text1的Text变为AB;当单击Command2时,Text1的属性变为CD,故选择B,不能选C,更不能选D。

第3题:

( 9 ) 在窗体上画 1 个命令按钮和 1 个文本框 , 其名称分别为 Command1 和 Text1 , 然后编写下列事件过程 :

Dim SaveAll As String

Private Sub Command1_Click( )

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

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

SaveAll=SaveAll+Chr(KeyAscii)

End Sub

程序运行后,在文本框中输入 abcdefg ,单击命令按钮,则文本框中显示的内容是 【 11 】 。


正确答案:

( 9 )【答案】 【 11 】 ABCD
【解析】该题中出现了 3 个内部函数: UCase 、 Left 和 Chr ,其功能分别是转换为大写字母、取左边的字符和求取 ASCII 字符 。 代码的功能是将字符串转换成大写字母形式后取最左边的 4 个字符 , 并将字符输出 。

第4题:

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

A.27

B.28

C.29

D.30


正确答案:C
解析:程序中各部分值的运算过程为:
  Text1.Text="28.653"
  Val(Text1.Text)=28.653
  Val(Text1.Text)+0.5=29.153
  Int(Val(Text1.Text)+0.5)=29
  x=29
  str(x)="29"

第5题:

在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为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。

第6题:

在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:

Private Sub Command1_Click()

a = InputBox("Enter an integer")

b = InputBox("Enter an integer")

Text1.Text = b + a

End Sub

程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是( )。

A.108

B.18

C.810

D.出错


正确答案:A

第7题:

在窗体上有一个命令按钮和一个文本框,其名称分别为Command1和text1,把文本框的Text属性设置为空白,然后编写如下事件过程:PrivatesubCommand1_click()A=inputbox(“Enteraninteger”)B=inputbox(“Enteraninteger”)Text1.text=b+aEndsub程序运行后,单击命令按钮,如果在输入对话框里输入8和10,则文本框中显示的内容是()。

A.108

B.18

C.810

D.出错


正确答案:A

第8题:

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

A.27

B.28

C.29

D.30


正确答案:C
解析:程序中各部分值的运算过程为:
  Text1.Text="28.653"
  Val(Text1.Text)=28.653
  Val(Text1.Text)+0.5=29.153
  Int(Val(Text1.Text)+0.5)=29
  x=29
  str(x)="29"

第9题:

在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Text1,把文本框的 Text属性设置为空白,然后编写如下事件过程: Private Sub Commandl_click() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示内容是( )。

A.108

B.18

C.810

D.出错


正确答案:A

第10题:

在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码: Private Sub Command1 Click() Text1.Text="AB" End Sub Private Sub Command2 Click() Text1.Text="CD" End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示

A.AB

B.CD

C.ABCD

D.CDAB


正确答案:B
解析:本题意在考查考生对文本框Text的理解。当单击Command1时,Text1的Text变为AB;当单击Command2时,Text1的属性变为CD,故选择B,不能选C,更不能选D。

更多相关问题