当前位置:首页 >> 其它课程 >>

2017年技术选考VB算法加试题周练插入数据


命题:杜宗飞 算法加试题一周一练(3) 行政班: 教学班: 姓名: ——聪明在于勤奋! 学号: 算法题解题步骤:①阅读题目 ②理解题意 ③阅读程序④分析算法⑤分析 程序和解题 【加试题】小明编写了一个在有序数组中插入一个新数据的程序,功能如下:程序运 行(窗体加载)时,随机生成 10 个数据存储在数组 a 中,并按升序排序后在列表框 List1 中显示。在文本框 Text1 中输入一个新数据 key。单击按钮 Command1 后,实现 将 key 值插入到有序数组 a 中,并在列表框 List2 中显示新的数组 a。程序运行界面如 下图所示: ① A B C D 图a 图b 图c (1)如图 a 所示要在窗体上添加了 个“图 b”中 A 所指的对象。 (2)如图 a 要在窗体上添加①所指的对象,应该在“图 b”中选择 (填字母) 。 (3)如图 c 所示,要修改标签上“原始数据”的字体颜色,应该修改 属性。 (4)代码 Command1_Click( )”中的 Command1 是 (填:对象名/方法名/事件 名/属性名) 。 (5) 假设有 Text1_Change( ) 事件处理过程代码, 该事件处理过程会在 (填: 命题:杜宗飞 A.Text1 上单击/ B Text1 中内容发生改变/C. Command1 上单击/)时执行。 (6)实现上述功能的 VB 程序如下。请在划线处填入合适代码。 Const max = 20 Dim n As Integer '数组中已存储数据的数量 Dim a(1 To max) As Integer Private Sub Form_Load() '窗体加载事件处理过程 Dim t As Integer Randomize '随机函数初始化 n = 10 For i = 1 To n '随机生成 n 个数据 a(i) = Int(Rnd * 90 + 10) Next i For i = 1 To n - 1 '升序排序 For j = n To i + 1 Step -1 If Then End If Next j Next i For i = 1 To n '在列表框 List1 中输出 List1.AddItem Str(a(i)) Next i End Sub Private Sub Command1_Click() Dim key As Integer '用于存储待插入的新数据 Dim pos As Integer '用于存储新数据在数组中的下标 Dim i As Integer key = i = 1 Do While key > a(i) Loop pos = i For i = n To pos Step -1 a(i + 1) = a(i) Next i n = n + 1 For i = 1 To n '在列表框 List2 中输出 List2.AddItem Str(a(i)) Next i End Sub 命题:杜宗飞 答案: a(j) < a(j - 1) t = a(j): a(j) = a(j - 1): a(j - 1) = t Val(Text1.Text) i = i + 1 a(pos) = key

赞助商链接
相关文章:
2017届浙江技术选考第二轮复习VB算法加试题复习6
2017届浙江技术选考第二轮复习VB算法加试题复习6_其它课程_高中教育_教育专区。有答案 2017 届浙江技术选考第二轮复习 VB 算法加试题复习六 一、选择题:本大题...
2016年10月技术选考VB算法加试题训练
2016年10月技术选考VB算法加试题训练_其它课程_高中教育_教育专区。命题:杜宗飞 算法加试题一周一练(8) 行政班: 教学班: 姓名: 学号: 【加试题 1】下列 VB...
浙江省高中信息技术选考加试题VB专项练习题五及答案
1.下列有关算法的说法正确的是: 浙江省高中信息技术选考加试题 VB 专项练习题五 一、选择题:本大题 13 小题,第小题 2 分,共 26 分。在每小题给出的四...
浙江省高中信息技术选考加试题VB专项练习题十二及答案
浙江省高中信息技术选考加试题 VB 专项练习题十二 ...1.下列 VB 语句或函数表达式的计算结果为 0 的是...现用变量 a 存储该类型的信息,则该变量的数据类 ...
浙江省高中信息技术选考加试题VB专项练习题二及答案
浙江省高中信息技术选考加试题VB专项练习题二及答案_高考_高中教育_教育专区。浙江省高中信息技术选考加试题 VB 专项练习题二 一、选择题:本大题 13 小题,第...
浙江省高中信息技术选考加试题VB专项练习题十一及答案
浙江省高中信息技术选考加试题 VB 专项练习题十一 ...要存储如下形式的 16 个数据,合适的数组定义语句是...我们可以采用的算法是: (A)枚举算法 (B)二分查找...
2017年11月浙江省技术选考试题(信息部分)
2017年11月浙江省技术选考试题(信息部分)_高考_高中教育_教育专区。2017年11...4 D. 9 12.【加试题】某对分査找算法VB 程序段如下: i = 1: j ...
(真题)2017年11月浙江省技术选考试题信息
绝密★考试结束前 2017 年 11 月浙江省普通高校招生选考科目考试 技术试题姓名...4 D. 9 12.【加试题】某对分査找算法VB 程序段如下: i = 1: j ...
2017年11月浙江省技术选考试题信息初稿(1)
绝密★考试结束前 2017 年下半年浙江省普通高校招生选考科目考试 技术试题姓名:...4 D. 9 12.【加试题】某对分査找算法VB 程序段如下: i = 1: j ...
2017年11月浙江省技术选考试题信息初稿2
绝密★考试结束前 2017 年下半年浙江省普通高校招生选考科目考试 技术试题姓名:...4 D. 9 12.【加试题】某对分査找算法VB 程序段如下: i = 1: j ...
更多相关标签: