首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时,选中List1中若干个列表项(如图1所示),单击“选中”按钮则把选中的项目移到List2中,单击“显示”,则在Text1文本框中显示这些
在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时,选中List1中若干个列表项(如图1所示),单击“选中”按钮则把选中的项目移到List2中,单击“显示”,则在Text1文本框中显示这些
admin
2019-06-11
26
问题
在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时,选中List1中若干个列表项(如图1所示),单击“选中”按钮则把选中的项目移到List2中,单击“显示”,则在Text1文本框中显示这些选中的城市(如图2所示)。已经给出了所有控件和程序,但程序不完整。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
选项
答案
[操作步骤] 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符,将问号改为正确的内容。 参考代码(画下划线部分是需填入的内容) Private Sub Command1_Click() Dim k% For k=List1.ListCount_1 To 0
Step-1
’k从最大到0,则步长应为-1 If List1.Selected(k)=True Then List2.AddItem
List1.List(k)
’添加项到LiSt2中 List1.RemoveItem
k
通过下标删除List1中的项目 End It Next k End Sub Private Sub Command2 Click() Dim k% Text1="已经选中的城市有:" For k=0 To LiSt2.LiStCount-1 Step 1 Text1=
Text1.Text
&""&List2.List(k) ’将List2中的项目连接在Text1中的内容之后 Next k End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/iRUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使文本框Text1中的文本不能被编辑,但能滚动和选择,下列正确的设置为()。
在VisualBasic中,所谓“文件”指的是()。
下面关于计时器控件的叙述中正确的是()。
在窗体上域一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:PrirateSubCommand1_Click()a=InputBox("Enteranin
窗体上有一个名称为CD1的通用对话框,一个名称为Command1的命令按钮,相应的事件过程如下:PrivateSubCommand1_Click()CD1.Filter="AllFile|*.*|TextFile|*.txt|
数据字典(DD)所定义的对象都包含于
数据库系统的三级模式不包括
下列关于数据库设计的叙述中,正确的是
随机试题
嘈杂的主症可见
下列哪种情形属于假药
妊娠恶阻的常见证候不包括
以下哪项不属于压力源中的心理-社会因素
某女士因患有Ⅲ度子宫脱垂,行手术治疗,术后护士应指导其采取的体位是
根据《合同法》,下列各类合同中,属于可变更或可撤销合同的是()。
甲公司2013年12月31日,年终“本年利润”账户贷方余额3000000元,利润分配前“利润分配—未分配利润”账户贷方余额为250000元,经股东大会决议利润分配方案为:本年提取10%的法定盈余公积金,提取5%的任意盈余,向投资者分配利润900000元。
蒋介石、汪精卫先后叛变革命,实行清党分共政策后。国民党是
窗体上有一个名称为Text1的文本框,一个名称为Combol的组合框。将文本框中的内容添加到组合框所使用的命令是
PassageFourHowcanwesummarizethecharacteroftheoldman?
最新回复
(
0
)