2018中央电大《VB程序设计》期末考试完整版小抄(可排版)

。Р阅读以下程序,写出其功能。РPublic As ConnectionРPublic ADOrs As New RecordsetРPrivate Sub cmdAdd_Click()РDim strSQL As String Р'文本框txtNo、txtName和组合框cboSex、cboClassР'分别用来输入学号、姓名、性别和班级РstrSQL = "select * from 学生表 where 学号='" + txtNo.Text + "'" РADOrs.Open strSQL, РIf Not ADOrs.EOF ThenРMsgBox "该记录已经存在,不能继续增加!", vbCritical + vbOKOnlyРADOrs.CloseРExit SubРEnd IfРstrSQL = "insert into 学生表(学号,姓名,性别,班级)"РstrSQL = strSQL + " values('" + txtNo.Text + "','" + txtName.Text + "'," РstrSQL = strSQL +"'" + cboSex.Text + "','" txtClass.Text + "')"Р.Execute strSQL РEnd SubР该段程序的功能是把一个学生记录插入到学生表中。首先查找数据表中是否存在文本框txtNo中输入的学号,如果存在则不增加;如果不存在,则把该学生的信息记录插入学生表中。Р四、程序设计题Р编写一个程序。程序初始界面如图1左图所示,设“学习目的”、“学习方法”和“退出”命令按钮的名称定义为cmdAim、cmdWay和cmdExit,标签控件的名称定义为lblContent。单击“学习目的”按钮,显示如图1的中图所示;单击“学习方法”命令按钮,显示如图1的右图所示;单击“退出”按钮时,退出程序。