[试题]

已知一个名为“学生”的Access数据库,库中的表“stud“存储学生的基本信息,包括学号、姓名、性别和籍贯。下面程序的功能是:通过下图所示的窗体向“stub” 表中添加学生记录,对应“学号”、“姓名”和“籍贯”的四个文本框的名称分别为tNo/tName、tSex 和tRes.当单击窗体中的“增加“命令按钮名称为Commandl.时,首先判断学号是否重复,如果不重复则向“stud“表中添加学生记录:如果学号重复,则给出提示信息。

Private Sub Form_Load.

、打开窗口时,连接Access数据库

Set ADOcn=CurrentProject,Connection

E.nd Sub

D.im ADOcn As New ADODB.Conneetion

Private Sub Commandl_Click.

、增加学生记录

D.im StrSQL As String

D.im ADOrs As New ADODB,Recordset

Set ADOrs ,ActiveConnection=ADOcn

A.DOrs.Open”Select 学号From Stud Where 学号=““+tNo+“‘”

IF Not ADOrs, (14) Then

‘如果该学号的学生记录已经存在,则显示提示信息

MsgBox”你输入的学号已存在,不能增加!“

E.lse

‘增加新学生的记录

strSQL=“Insert Into stud 学号,姓名,性别,籍贯.”

strSQL=strSQL+”Values‘”+tNo+”‘,’”+tName+” ‘,’“+tSex”‘,’+tRes+” ‘.”

A.DOen.Execute (15)

MsgBox “添加成功,请继续!”

E.nd If

A.DOrs.Close

Set ADOrs=Nothing

E.nd Sub

参考答案与解析:

相关试题

( 14 )己知一个名为 “ 学生 ” 的 Access 数据库,库中的表 “

[试题]( 14 )己知一个名为 “ 学生 ” 的 Access 数据库,库中的表 “ stud ” 存储 学生的基本信息,包括学号、姓名 、 性别和籍贯 。 下面程序的功能是 : 通过下图所示的窗体向 “ stud ” 表中添加学生记录 , 对应 “ 学号 ” 、“ 姓名 ” 、 “ 性别 ” 和 “ 籍贯 ” 的四个文本框的名称分别为 tNo 、tName 、 tSex 、 tRes 。 当单击窗体中的 “ 增加 ” 命令按扭(名称为 Command1 )时, 首先判断学号是否,如果不重复则向 "s

  • 查看答案
  • ①根据数据库“学生管理”中的表“宿舍信息”和“学生信息”建立一个名为myv的视图

    [试题]①根据数据库“学生管理”中的表“宿舍信息”和“学生信息”建立一个名为myv的视图,该视图包含字段“姓名”、“学号”、“系”、“宿舍”和“电话”。要求根据学号排序(升序)。②建立一个表单,文件名为myf,在表单上显示前面建立的视图。在表格控件下面添加一个命令按钮,标题为“关闭”。单击该按钮退出表单。

  • 查看答案
  • 基于学生.课程数据库中的三个基本表:学生信息表:s (snumber, snam

    [单选题]基于学生.课程数据库中的三个基本表:学生信息表:s (snumber, sname, sex, age, dept)主码为snumber课程信息表:c(cnumber, cname,teacher)主码为cnumber学生选课信息表:sc(snumber, cnumber, grade)主码为(snumber, cnumber)“从学生选课信息表中找出无成绩的元组”的SQL语句是( )。A.)SELECT ﹡FROM sc WHERE grade=NULLB.)SELECT﹡FROM sc WH

  • 查看答案
  • 第八题: 已知SQL Server数据库的有一个数据库TestDB,学生表结构如

    [主观题]第八题: 已知SQL Server数据库的有一个数据库TestDB,学生表结构如下:表名:Student字段名 类型 说明id int 自增1name varchar(16)sex char(1) 'F'表示女性,'M'表示男性... ...已知已经定义了ADODB.Connection对象 ConnTestDB 已连接了上述的TestDB数据库可以在以后的测试题中直接引用该对象.在上述数据库中,有一个表存放学生的得分的,结构如下:表名:Score字段名 类型 说明StuID int 学

  • 查看答案
  • 第九题:已知SQL Server数据库的有一个数据库TestDB,学生表结构如下

    [主观题]第九题:已知SQL Server数据库的有一个数据库TestDB,学生表结构如下:表名:Student字段名 类型 说明id int 自增1name varchar(16)sex char(1) 'F'表示女性,'M'表示男性... ...已知已经定义了ADODB.Connection对象 ConnTestDB 已连接了上述的TestDB数据库可以在以后的测试题中直接引用该对象.已知:某一学生:陈六,男,语文 80分,数学60 分,现要求编写ASP 代码将该学的数据插入数据库中,分别插入

  • 查看答案
  • (1)在考生文件夹中有一个“学生管理”数据库,其中有数据库表“学生”存放学生信息

    [试题](1)在考生文件夹中有一个“学生管理”数据库,其中有数据库表“学生”存放学生信息,使用菜单设计器制作一个名为“cd1”的菜单,菜单包括“数据管理”和“文件”两个菜单栏。每个菜单栏都包括一个子菜单。菜单结构如下:数据管理数据查询文件保存关闭其中,“数据查询”予菜单对应的过程完成下列操作:打开数据库“学生管理”,使用SQL的SELECT语句查询数据库表“学生”中的所有信息,然后关闭数据库。“关闭”菜单项对应的命令为“SET SYSMENU TO DE-FAULT”,使之可以返回到系统菜单。保存菜单项不

  • 查看答案
  • 基于学生£­课程数据库中的三个基本表:学生信息表:s(sno, sname, s

    [单选题]基于学生-课程数据库中的三个基本表:学生信息表:s(sno, sname, sex, age, dept) 主码为sno 课程信息表:c(cno, cname, teacher) 主码为cno 学生选课信息表:sc(sno, cno, grade) 主码为(sno, cno)“从学生选课信息表中找出无成绩的元组”的SQL语句是A.SELECT * FROM sc WHERE grade=NULLB.SELECT * FROM sc WHERE grade IS ‘ ’C.SELECT * FRO

  • 查看答案
  • 该题基于“学生£­选课£­课程”数据库中的3个关系。学生基本信息S(S#,SN

    [单选题]该题基于“学生-选课-课程”数据库中的3个关系。学生基本信息S(S#,SNAME, SEX, AGE)选课信息SC(S#, C#, GRADE)课程信息C(C#, CNAME, TEACHER)若要求“查询选修了3门以上课程的学生的学生号”,正确的SQL语句是( )。A.SELECT S# FROM SC GROUP BY S# WHERE COUNT (*)>3B.SELECT S# FROM SC GROUP BY S# HAVING COUNT(*)>3C.SELECT S# FROM S

  • 查看答案
  • 第七题: 已知SQL Server数据库的有一个数据库TestDB,学生表结构如

    [主观题]第七题: 已知SQL Server数据库的有一个数据库TestDB,学生表结构如下:表名:Student字段名 类型 说明id int 自增1name varchar(16)sex char(1) 'F'表示女性,'M'表示男性编写ASP 代码,将 Student中的人的姓名及性别列出来,并给统计学生人数如下:姓名 性别张三 男李四 男王五 女... ...总共有100个学生

  • 查看答案
  • 第(37)£­(38)题基于学生£­课程数据库中的三个基本表: 学生信息表:s(

    [单选题]第(37)-(38)题基于学生-课程数据库中的三个基本表: 学生信息表:s(sno, sname, sex, age, dept) 主码为sno 课程信息表:c(cno, cname, teacher) 主码为cno 学生选课信息表:sc(sno, cno, grade) 主码为(sno, cno) /"从学生选课信息表中找出无成绩的元组/"的SQL语句是A.SELECT * FROM sc WHERE grade=NULLB.SELECT * FROM sc WHERE g

  • 查看答案
  • 已知一个名为“学生”的Access数据库,库中的表“stud“存储学生的基本信息