首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个列表框List1、一个组合框Combo1和一个文本框Text1,编写如下程序代码: Private Sub Form_Load() List1.AddItem "111" List1.AddItem "222" Lis
在窗体上画一个列表框List1、一个组合框Combo1和一个文本框Text1,编写如下程序代码: Private Sub Form_Load() List1.AddItem "111" List1.AddItem "222" Lis
admin
2019-03-08
39
问题
在窗体上画一个列表框List1、一个组合框Combo1和一个文本框Text1,编写如下程序代码:
Private Sub Form_Load()
List1.AddItem "111"
List1.AddItem "222"
List1.AddItem "333"
Combo1.AddItem "444"
Combo1.AddItem "555"
Combo1.AddItem "666"
Text1.Text = ""
End Sub
程序运行后,如果单击窗体,要求在文本框中显示"222555",以下能实现该操作的事件过程是( )。
选项
A、Private Sub Form_Click()
Combo1.ListIndex = 1
List1.ListIndex = 1
Text1.Text = List1.Text + Combo1.Text
End Sub
B、Private Sub Form_Click()
Text1.Text = List1.ListIndex(1) + Combo1.ListIndex(1)
End Sub
C、Private Sub Form_Click()
Combo1.ListIndex = 2
List1.ListIndex = 2
Text1.Text = List1.Text + Combo1.Text
End Sub
D、Private Sub Form_Click()
Text1.Text = List1.ListIndex(2) + Combo1.ListIndex(2)
End Sub
答案
A
解析
ListIndex属性的设置值为已选中的表项的位置。表项位置由索引值指定,第一项的索引值为0,第二项为1,以此类推。"Combo1.ListIndex = 1"表示将组合框的第二项设置为选中项,Combo1.Text="555";"List1.ListIndex = 1"表示将列表框的第二项设置为选中项,List1.Text="222"。由题意知,最终文本框Text1中存放的值为"222555",故A选项正确,选项B、C、D均错误。
转载请注明原文地址:https://jikaoti.com/ti/PUm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画多个控件,其中有一个名称为Text1的文本框,影响Text1的Tab顺序的属性是
对于窗体Form1,下列叙述中正确的是
窗体上有一个Text1文本框,并编写了下面事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger) KeyAscii=KeyAscii+3EndSub程序运行时,在文本框中输入字符"A",则在文本
设运行程序时弹出的菜单如图所示.关于该菜单,以下叙述中错误的是( )。
窗体的单击事件过程如下:PrivateSubForm_Click()Dima(5,5)AsIntegerFori=1To5Forj=1To5a(i,j)=
设a=10,b=4,c=5,d=7,表达式a>bAndNotc
把数学表达式表示为正确的VB表达式应该是( )。
窗体上有一个名称为Combo1的组合框,为了引用Combo1中最后一个列表项,应使用的表达式是
随机试题
以下不属于创造价值的原则是()。
我国票据上记载的开户银行账号属于票据的_________。
牙体缺损的修复方法不包括
对于骨盆底,下列哪项正确
大出血患者输注冷沉淀后的最重要的检测指标是
患者,蒸蒸汗出,渴喜引饮,面赤烘热,烦躁不宁,或有发热,或关节烦痛,或大便干结,舌红,苔黄,脉洪大。治当清里泄热,宜选
有毒的药物是
根据我国的《反补贴条例》进行调查、采取反补贴措施的补贴,必须具有专向性。下列情形中,具有专向性的补贴是()。
设D={(u,v)|u2+v2≤x2},则
Notlongago,TedGupopenedabatteredoldsuitcasefromhismothersatticanddiscoveredafamilysecret.Insidewasathick
最新回复
(
0
)