违法和不良信息举报 联系客服
免费注册 登录

在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程:Private Sub Form_Load() List1.Ad

题目

在窗体上画一个文本框和一个列表框，然后编写如下两个事件过程： Private Sub Form_Load() List1.AddItem "357" List1.AddItem "246" List1.AddItem "123" List1.AddItem "456" Text1.Text="" End Sub Private Sub List1_Db1Click() m=List1.Text Print m+Text1.Text End Sub 程序运行后，在文本框中输入“123”，然后双击列表框中的“456”，输出结果为( )。

A．1245

B．456123

C．123456

D．0

如果没有搜索结果或未解决您的问题，请直接 联系老师 获取答案。
相似问题和答案

第1题：

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


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

第2题：

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：

Private Sub Form_Click()

Textl.Text="VB程序设计"

End Sub

Private Sub Textl_Change()

Picturel.Print"VB programming"

End Sub

程序运行后，单击窗体，则在文本框中显示的内容是【 】，而在图片框中显示的内容是【 】。


正确答案：VB程序设计VB programming
VB程序设计,VB programming 解析：文本框内容是因窗体的dlink事件而改变，而PictureBox内容是因文本框内容的改变而改变的。

第3题：

在窗体上画一个文本框和一个列表框，然后编写如下两个事件过程： Private Sub Form_Load() List1.Addltem "357" List1.Addltem "246" List1.Addltem "123" List1.AddItem "456" Text1.Text = "" End Sub Private Sub Listl_DblClick0 m=List1.Text Print m + Text1.Text End Sub 程序运行后，在文本框中输入“123”，然后双击列表框中的“456”，输出结果为( )。

A．1245

B．456123

C．123456

D．0


正确答案：B
解析：分析程序，在程序运行时，列表框自动添加几个列表项，双击列表框时，给程序把当前列表项的Text属性值赋值给变量m，然后将m与文本框的Text属性值连接起来并输出。List.Text代表列表框中当前项目的内容，选择456后，m的值为456，与文本框中的字符串连接，输出到窗体上。

第4题：

在窗体上画两个文本框(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。

第5题：

在窗体上画一个文本框，然后编写如下事件过程：程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为（ ）。

A. a

B. A

C. aaaaaa

D. AAAAAA


正确答案：D
D)    【解析】本题考查KeyPress事件过程和字符串函数。KeyPress事件的过程格式为：Sub object_KeyPress([Index As Integer,]KeyAscii As Integer)，其中KeyAscii为字符ASCII码。当在文本框中输入字符a后，UCase函数把输入的字符转化为大写字符，Asc函数则把字符转化为ASCII码值。String函数则产生6个同样的字符A。

第6题：

在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程： Private Sub Form_Load() For i=1 To 10 List1.AddItem i * 10 Next i Text1.Text=" " End Sub Private Sub List1_Click() Print List1.Text + Text1.Text End Sub 程序运行后，在文本框中输入“123”，然后双击列表框中的第四行，则在窗体上输出的结果为

A．40123

B．163

C．123

D．30123


正确答案：A
解析：当双击列表框的第四行，对应的Text值是40而不是123。另外，ListBox和TextBox的Text属性返回的均为字符型数据。窗体上显示的是列表框的内容与文本框的内容连接以后的内容，即为40123。

第7题：

在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程：

PrivateSubForm_Load()

List1.AddItem"357"

List1.AddItem"246"

List1.AddItem"123"

List1.AddItem"456"

Text1.Text=""

EndSub

PrivateSubList1_DblClick()

a=List1.Text

Printa+Text 1.Text

EndSub

程序运行后，在文本框中输入"789"，然后双击列表框中的"456"，则输出结果为( )

A.456789

B.789456

C.111315

D.101315


正确答案：A

第8题：

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：

Private Sub Form_Click（）

Text1.Text = "VB程序设计"

End Sub

Private Sub Text1_Change（）

Picture1.Print "VB Programming"

End Sub

程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是_____。


正确答案：

VB程序设计　VB Programming

第9题：

在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程： Private Sub Form_ Load () Liet1.AddItem“357” List1.AddItem“246” List1.AddItem“123” List1.AddItem“456” Text1.Text=“” End Sub Private Sub List1_DblClick() a=List1.Text Print a+Text1.Text End Sub 程序运行后，在文本框中输入“789”，然后双击列表框中的“456”，则输出结果为______ 。

A．1245

B．456789

C．789456

D．0


正确答案：B

相关内容