VB编程练习与数据库操作指南

170、在本次练习中，你要修改练习4中的“大学课程”应用程序。使用Windows系统复制“大学课程解决方案”文件夹，将副本重命名为“修改后的大学课程解决方案”。打开“修改后的大学课程解决方案”文件夹中的“大学课程解决方案”（College Courses Solution.sln）文件。打开设计器窗口，在窗体中添加一个“计算平均绩点（GPA）”按钮。打开代码编辑器窗口，编写“计算平均绩点（GPA）”按钮的点击事件过程，使其显示学生的平均绩点（A 等级计4分，B 等级计3分，C等级计2分，D等级计1分，F等级计0分），并将平均绩点显示在消息框中。保存解决方案，然后启动并测试应用程序。关闭代码编辑器窗口，然后关闭解决方案。

1. 使用Windows系统复制“大学课程解决方案”文件夹，并将副本重命名为“修改后的大学课程解决方案”。
2. 打开“修改后的大学课程解决方案”文件夹中的“大学课程解决方案”（ College Courses Solution.sln ）文件。
3. 打开设计器窗口，在窗体中添加“计算平均绩点（GPA）”按钮。
4. 打开代码编辑器窗口，编写“计算平均绩点（GPA）”按钮的点击事件过程，按A计4分、B计3分、C计2分、D计1分、F计0分的规则计算并显示学生的平均绩点，将结果显示在消息框中。
5. 保存解决方案，启动并测试应用程序。
6. 关闭代码编辑器窗口和解决方案。

171、打开位于 VB2010\Chap13\Debug Solution - Lesson C 文件夹中的 Debug Solution (Debug Solution.sln) 文件。该应用程序连接到 Friends 数据库，该数据库存储在 Friends.accdb 文件中。数据库包含一个名为 tblFriends 的表，该表包含九条记录。打开代码编辑器窗口并查看现有代码。修正代码以去除其中一行代码下方出现的锯齿线。保存解决方案，然后启动并测试应用程序。若应用程序运行不正常，修正应用程序代码中的错误。再次保存解决方案，然后启动并测试应用程序。关闭代码编辑器窗口，然后关闭解决方案。

按以下步骤操作：

1. 打开 VB2010\Chap13\Debug Solution - Lesson C 文件夹中的 Debug Solution.sln 文件；
2. 打开代码编辑器窗口查看代码，去除代码中出现锯齿线的错误；
3. 保存解决方案，启动并测试应用程序；
4. 若应用程序运行不正常，修正代码错误；
5. 再次保存解决方案并测试；
6. 关闭代码编辑器窗口和解决方案。

172、以下哪个选项可以删除与名为findRow的DataRow变量关联的记录？a. findRow.Delete() b. findRow.Remove() c. delete(findRow) d. 以上都不是

A

173、打开位于VB2010\Chap14\HR Sales Solution文件夹中的HR Sales Solution (HR Sales Solution.sln)文件。如有必要，打开设计器窗口。该应用程序连接到Sales数据库。数据库包含一个名为tblSales的表。该表包含三个数值型字段（YearNum、MonthNum和Sales）和五条记录。编写“添加”按钮的Click事件过程代码，使得仅当三个文本框都包含数据时，允许用户向数据库中添加记录，且记录按年份数字以数字顺序显示。保存解决方案，然后启动并测试应用程序。最后关闭代码编辑器窗口，再关闭解决方案。

此为操作说明，需按以下步骤操作：

1. 打开指定文件夹中的 HR Sales Solution.sln 文件，必要时打开设计器窗口；
2. 确保应用程序连接到 Sales 数据库，该数据库的 tblSales 表有三个数值型字段和五条记录；
3. 编写“添加”按钮的 Click 事件过程代码，实现仅当三个文本框都有数据时可添加记录，且记录按年份数字排序；
4. 保存解决方案，启动并测试应用程序；
5. 关闭代码编辑器窗口和解决方案。

174、打开位于VB2010\Chap14\Sydney Solution文件夹中的Sydney Solution (Sydney Solution.sln)文件。如有必要，打开设计器窗口。该应用程序已连接到Products数据库。该数据库包含一个名为tblProducts的表。该表包含10条记录，每条记录由三个字段组成。ItemNum（主键）和ItemName字段包含文本；Price字段包含数字。“添加”按钮的Click事件过程应允许用户向数据库中添加记录，但前提是三个文本框中都包含数据。“删除”按钮的Click事件过程应允许用户从数据库中删除记录。应用程序启动时，记录应按商品编号排序。对应用程序进行编码。保存解决方案，然后启动并测试该应用程序。（不要尝试添加商品编号重复的记录。）关闭代码编辑器窗口，然后关闭解决方案。

按照以下步骤操作：

1. 打开指定路径下的 Sydney Solution.sln 文件，若有需要，打开设计器窗口；
2. 确保应用连接到 Products 数据库，该数据库的 tblProducts 表有 10 条记录，包含 ItemNum