首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp(相应的窗体文件名为sjt3.frm),在窗体上添加一个名称为List1的列表框和一个名称为Text1的文本框,如图1所示。编写窗体的MouseDown事件过程。程序运行后,如果用鼠标单击窗体,则从键盘上输入要添
在考生文件夹下有一个工程文件sjt3.vbp(相应的窗体文件名为sjt3.frm),在窗体上添加一个名称为List1的列表框和一个名称为Text1的文本框,如图1所示。编写窗体的MouseDown事件过程。程序运行后,如果用鼠标单击窗体,则从键盘上输入要添
admin
2016-06-23
41
问题
在考生文件夹下有一个工程文件sjt3.vbp(相应的窗体文件名为sjt3.frm),在窗体上添加一个名称为List1的列表框和一个名称为Text1的文本框,如图1所示。编写窗体的MouseDown事件过程。程序运行后,如果用鼠标单击窗体,则从键盘上输入要添加到列表框中的项目(内容任意,不少于三个);如果用鼠标右键单击窗体,则从键盘上输入要删除的项目,将其从列表框中删除。程序的运行情况如图2所示。这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为适当的内容,使其正确运行,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件,按表3.18昕列在窗体画出控件并设置其属性。 [*] 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考代码(画下划线部分是需填入的内容) Private Sub Form_MouseDown(Button As Integer,Shift AS Integer,X As Single,Y As Single) If Button=1 Then Text1.Text=InputBox("请输入要添加的项目") List1.AddItem
Text1.Text
’将Text1中的内容加入列表 End If If Button=2 Then Text1.Text=InputBox("请输入要删除的项目") ’列表总数用ListCount求得 For i=0 To
List1.ListCount-1
’判断列表项是否为要删除的项 If List1.List(i)=
Text1.Text
Then ’删除i所对应的项 List1.RemoveItem
i
End If Next i End If End Sub 程序结束 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/lvLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列语句段在运行时的显示结果是______。Clsx=10.34+8PrintLen(x)
当循环队列非空且队尾指针等于队头指针时,说明循环队列已满,不能进行人队运算,这种情况称为______。
要使控件与框架捆绑在一起,以下操作正确的是()。
若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是()。
在窗体上画一个名称为Command1的命令按钮,编写如下事件过程PrivateSubCommand1_Click()DimaAsStringa=______Fori=1To5PrintSpace(6
结构化程序设计方法的3种基本控制结构中不包括
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:SubCommand1_Click()DimstudentAsstudtypeDimrecord_noAsInteger
检查软件产品是否符合需求定义的过程称为
在运行阶段,要在文本框Text1获得焦点时选中文本框中的所有内容,则对应的事件过程是()。
随机试题
TheValuableTeethHereisastorytoldaboutanAmericangeneralwhowasaveryimportantfigure(人物)intheAmericanarmy
人民法院受理某甲抢劫案件,开庭时,公诉人出庭公诉,没有委托辩护人,并查明某甲在案件受理后刚满18周岁。人民法院如何为某甲指定辩护人?
某宗房地产的净收益为每年50万元,建筑物价值为200万元,建筑物的资本化率为12%,土地的资本化率为10%,该宗房地产的价值为()。
当力P直接作用在简支梁AB的中点时,梁内的σmax超过许用应力值的30%。为了消除过载现象,配置了如5—5—27图所示的辅助梁CD,试确定此辅助梁的跨度a为()m。
()是一种低价格策略,即在新产品投入市场时,价格定得较低,快速占据市场空间。
税收的基本特征是指税收的(),通常被简称为税收的“三性”。
进度控制的技术措施主要包括()。
设A是3阶非零矩阵。满足A2=A,且A≠E,则必有()
A、 B、 C、 B本题考查介词under,由“你知道桌子下面是谁的包吗?”可知正确答案为B。要听懂underthetable。
NormanBorlaug:’FatheroftheGreenRevolution’Fewpeoplehavequietlychangedtheworldforthebettermorethanthisru
最新回复
(
0
)