题目内容
（请给出正确答案）
提问人：网友qpl4226
发布时间：2022-01-07
[主观题]
窗体上建立一个简单组合框，在组合框的文本框输入数字...
窗体上建立一个简单组合框，在组合框的文本框输入数字字符，按回车键后加入到组合框的列表框内，如下左图所示；单击”交换”命令按钮，将列表框中最小值项目和第0个项目交换；最大值项目与最后项目交换, 如下右图所示。
保存工程和窗体，窗体文件名为：昵称-10-2.frm;工程名为：昵称-10-2.vbp。将工程文件和窗体文件压缩成：昵称-10-2.rar，以附件形式提交。 提示： ① 只能输入数字，在Combo1_KeyPress事件通过如下代码实现： Select Case KeyAscii Case 48 To 57, 13 ‘ 0～9数字和回车键为合法数据 Case Else ‘ 否则为非法数据，去除非法字符 KeyAscii = 0 End Select ② 找最小值和最大值必须声明4个变量：如aMin、iMin、aMax和iMax分别存放最小值、最小值下标，最大值和最大值下标，并将列表框中第0个项目为上述4个变量的初值； ③ 按照求最大值和最小值的方法从组合框中找最小值和最大值，并获得最小值和最大值下标；注意比较时项目要用Val函数，否则作为字符串比较。 ④ 将组合框的第0相与最小值交换、最大值与最后项交换。例最大值与最后项交换的代码： t = Combo1.List(Combo1.ListCount - 1) Combo1.List(Combo1.ListCount - 1) = Combo1.List(imax) Combo1.List(imax) = t
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
抱歉！暂无答案，正在努力更新中……
保存工程和窗体，窗体文件名为：昵称-10-3.frm;工程名为：昵称-10-3.vbp。将工程文件和窗体文件压缩成：昵称-10-3.rar，以附件形式提交。 提示： ① 只能输入数字，在Combo1_KeyPress事件通过如下代码实现： Select Case KeyAscii Case 48 To 57, 13 ‘ 0～9数字和回车键为合法数据 Case Else ‘ 否则为非法数据，去除非法字符 KeyAscii = 0 End Select ② 找最小值和最大值必须声明4个变量：如aMin、iMin、aMax和iMax分别存放最小值、最小值下标，最大值和最大值下标，并将列表框中第0个项目为上述4个变量的初值； ③ 按照求最大值和最小值的方法从组合框中找最小值和最大值，并获得最小值和最大值下标；注意比较时项目要用Val函数，否则作为字符串比较。 ④ 将组合框的第0相与最小值交换、最大值与最后项交换。例最大值与最后项交换的代码： t = Combo1.List(Combo1.ListCount - 1) Combo1.List(Combo1.ListCount - 1) = Combo1.List(imax) Combo1.List(imax) = t
