首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的空列表框。程序运行时,单击Commandl按钮,则从键盘输入10个任意字符串,并按字典顺序添加到Listl中成为它的列表项。 给出的程序不完整。要求:去掉程序中的注释符,把程
在考生目录下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的空列表框。程序运行时,单击Commandl按钮,则从键盘输入10个任意字符串,并按字典顺序添加到Listl中成为它的列表项。 给出的程序不完整。要求:去掉程序中的注释符,把程
admin
2020-04-08
93
问题
在考生目录下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的空列表框。程序运行时,单击Commandl按钮,则从键盘输入10个任意字符串,并按字典顺序添加到Listl中成为它的列表项。
给出的程序不完整。要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释“′”,将问号改为正确的内容。 参考答案(划线部分是需要填入的内容) Private Sub Commandl_Click() Dim st$(10) For k=1 To 10 st(k)=InputBox(”请输入一个字符串”) Next k For i=l To 9 k=i For j=i+l To 10 If st(k)>
st(j)
Then k=1 End If Nextj List1.Addltem st(k) st(k)=
st(j)
Next i
List1.AddItem st(10)
End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
题目要求按字典顺序将随机输入的10个任意字符串添加到Listl列表框中,使用List1的Addltem方法向列表框中插入列表项,若未指定索引值,则新插入的列表项排列在原有项目的下方,故本题中最先插入数组中最小的值。
转载请注明原文地址:https://kaotiyun.com/show/qNTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
通用对话框Filter属性的作用是
如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是( )。
以下关于窗体的叙述中错误的是( )。
以下能够设置控件焦点的方法是( )。
运行如下程序:PrivateSubCommandl_Click()Dima(5,5)AsIntegerF0ri=1To5Forj=1To4a(i,j)=i*2+JIfa(i,
下列可以激活属性窗口的操作是()。
窗体上有名称为Commandl的命令按钮和名称为Text1的文本框PrivateSubCommandl一Click()Text1.Text=“程序设计”Text1.SetFocusEndSubPriv
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是()。
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:PrivateSubCommand1_Click()Dima(10)AsInteger,maxAsIntegerFork=1To10
随机试题
如果要选定全部文件,可以执行“编辑”菜单下的“全部选定”命令。也可以按_________键来执行“全部选定”操作。
下面哪项是不正确的
Lusehka关节是指
工程业主情况、设计单位情况、咨询单位情况也影响着建设工程投资,这说明( )也是影响建设工程投资的重要因素。
发包人需变更增加的设计内容专业性特点较强,发包人经( )书面同意后,可委托其他具有相应资质的建设工程勘察、设计单位修改。
一个部落或种族在历史的发展中灭绝了,但它的文字会流传下来。“亚里洛”就是这样一种文字。考古学家是在内陆发现这种文字的。经研究,“亚里洛”文字中没有表示“海”的文字,但有表示“冬天”“雪”和“狼”等的文字。因此,专家们推测,使用“亚里洛”文字的部落或种族在历
证明:曲线上任一点的法线到原点距离等于口.
他没参加考试。
Whatdoyouconsidertobethemostimportantroominahouse?Whyisthisroommoreimportanttoyouthananyotherroom?
加拿大人和美国人通常在餐馆、机场、旅馆和美发店给小费。给理发师以及餐厅服务生的小费通常是账单的10%至20%。
最新回复
(
0
)