在考生目录下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的空列表框。程序运行时,单击Conunand1按钮,则从键盘输入10个任意字符串,并按字典顺序添加到List1中成为它的列表项。 给出的程序不完整。要求:去掉程序中的注释符,把

admin2020-08-10  36

问题 在考生目录下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的空列表框。程序运行时,单击Conunand1按钮,则从键盘输入10个任意字符串,并按字典顺序添加到List1中成为它的列表项。
    给出的程序不完整。要求:去掉程序中的注释符,把程序中的?改为正确的内容。
    注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。

选项

答案题目要求按字典顺序将随机输入10个任意字符串添加到List1列表框中,使用List1的AddItem方法向列表框中插入列表项,若未指定索引值,则新插入的列表项排列在原有项目的下方,故本题中最先插入数组中最小的值。 第1个?处应为:st(j) 第2个?处应为:j 第3个?处应为:st(i) 第4个?处应为:List1.AddItem st(10) 步骤:打开本题程文件。 步骤二:打开代码编辑窗口,去掉程序中的注释“’”将问号改为正确的内容。 Private Sub Commmand1_Click Dim at $ (10) For k=1 To 10 st(k)= lnputBox(“请输入一个字符串”) Next k For i=1To9 k=i For j=i+1To10 If st(k)>st(j)Then k=j End If Next j List1,AddItem st(k) st(k)=st(i) Next i List1,AddItem st(10) End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析
转载请注明原文地址:https://jikaoti.com/ti/v4S0FFFM
0

最新回复(0)