VB访问数据库3 导学案-2021-2022学年高中信息技术浙教版选修1

《VB访问数据库3》导学案 [考试要求] 1．VB访问数据库 (c) [学习目标] 1. 能够用VB访问数据库中的数据。 2. 能够用VB对数据库的数据进行简单处理 3. 在VB中综合运用数据库 [自主学习] 1、 知识梳理 1．完善VB读取数据表中记录到数组的典型程序段 Dim ‘定义一个Connection的对象实例 Dim rs As New ADODB.Recordset ‘定义一个Recordset的对象实例 Dim sql As String conn.ConnectionString = " =microsoft.ace.oledb.12.0;data source=" + App.Path + "\ " conn. sql = "select * from " rs.Open sql, conn, adOpenDynamic, adLockOptimistic c = 0 Do While Not rs. ‘数据表未读完 c = c + 1 数组名1(c) = rs.Fields("字段名1") ‘或写成数组名1(c) = rs.Fields(0) 数组名2(c) = rs.Fields("字段名2") ‘或写成数组名2(c) = rs.Fields(1) ...... rs.MoveNext Loop rs. ‘关闭Recordset的连接 ‘关闭Connection的连接 [课堂练习] 1．小李设计了一个插入排序的VB程序，功能如下：在列表框List1中按成绩从低到高显示每个学生的姓名和成绩，在文本框Text1中输入一个学生的姓名，在文本框Text2中输入这位学生的成绩，单击“插入排序”按钮Command1，检查数组列表中的学生成绩，将其插入到适当位置，保持成绩有序，并在列表框List2中显示插入后的学生姓名与成绩序列。程序运行界面如图所示。 实现以上功能的VB程序如下，请回答下列问题： (1)小李