首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
教师管理数据库有数据表“teacher”,包括“编号”、“姓名”、性别”和“职称”四个字段。下面程序的功能是:通过窗体向teacher表中添加教师记录。对应“编号”、“姓名”、性别”和“职称”的4个文本框的名称分别为:tNo、tName、tSex和tTit
教师管理数据库有数据表“teacher”,包括“编号”、“姓名”、性别”和“职称”四个字段。下面程序的功能是:通过窗体向teacher表中添加教师记录。对应“编号”、“姓名”、性别”和“职称”的4个文本框的名称分别为:tNo、tName、tSex和tTit
admin
2019-09-19
11
问题
教师管理数据库有数据表“teacher”,包括“编号”、“姓名”、性别”和“职称”四个字段。下面程序的功能是:通过窗体向teacher表中添加教师记录。对应“编号”、“姓名”、性别”和“职称”的4个文本框的名称分别为:tNo、tName、tSex和tTitles。当单击窗体上的“增加”命令按钮(名称为Command1)时,首先判断编号是否重复,如果不重复,则向“teacher”表中添加教师记录;如果编号重复,则给出提示信息。
有关代码如下:
Private ADOcn As New ADODB.Connection
Private Sub Form_Load()
打开窗口时,连接Access本地数据库
Set ADOcn=_____________________
End Sub
Privae Sub CommandO_Click()
’追加教师记录
Dim strSQL As String
Dim ADOcmd As New ADODB.Command
Dim ADOrs As New ADODB.Reeordset
Set ADOrs.ActiveConnection=ADOcn
ADOrs.Open"Select编号From teacher Where编号="’+tNo+""’
If Not ADOrs.EOF Then
MsgBox”你输入的编号已存在,不能新增加!”
Else
ADOcmd.ActiveConnection=ADOcn
strSQL="Insert Into teacher(编号,姓名,性别,职称)"
strSQL=strSQL+"Values("’+tNo+"’,"’+tname+"’,"’+tsex+"’,"’ +ttitles+"’)"
ADOcmd.CommandText=strSQL
ADOcmd.Execute
MsgBox"添加成功,请继续!"
End If
ADOrs.Close
Set ADOrs=Nothing
End Sub
按照功能要求,在横线上应填写的是( )。
选项
A、CurrentDB
B、CurrentDB.Connention
C、CurrentProject
D、CurrentProject.Connection
答案
D
解析
由于变量ADOcn定义为ADODB连接对象,因此,当初始化为连接当前数据库时要使用Set ADOcn=CurrentProject.Connection。因为CurrentDb是DAO.Database的对象,而CurrentProject才是适用于ADO.Connection的对象。
转载请注明原文地址:https://kaotiyun.com/show/bE6D777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
“人不能两次踏进同一条河流”和“人一次也不能踏进同一条河流。”这两种说法
中国共产党创建的历史特点是
宋代徐玑在《黄碧》中说,“水清知酒好,山瘦识民贫”。其中所呈现的水与酒、山与民的关系告诉我们()
设z=z(x,y)有二阶连续偏导数,且满足作自变量与因变量变换:u=x+y,v=x—y,w=xy…z将z所满足的方程变换为w关于u,v的偏导数满足的方程.
假定要建立一个关于篮球职业联盟的数据库,需管理如下信息:·每个球队有球队名称、所在城市;·每位球员有球员姓名、薪酬;·每场比赛有比赛编号、比赛时间、比赛结果、参加比赛的主场球队、参加比赛的客场球队。其中带下划线的属性是唯一标识。其他需满足的要求如下
在SQLServer2008中,计算两个日期之差的函数是【6】。
基于网络的入侵检测系统采用的识别技术主要有:频率或阈值、统计意义上的非正常现象检测、事件的相关性,以及()。
对数据库“稿件管理”中的表“投稿”使用表单向导建立一个简单的表单,文件名为“bd1”,要求显示表中的全部字段,表单样式为“凹陷式”,按钮类型为“文本按钮”,按“投稿日期”升序排序,表单标题为“稿件投稿情况表”。
下面是打印输出所有和为10000的连续整数(如:1998,1999,2000,2001,2002)的程序,请在每条横线处填写适当语句,使程序的功能完整。注意:请勿改动main()主方法和其他已有的语句内容,仅在横线处填入适当的语句。p
下列代码将对象写入的设备是()。ByteArrayOutputStreambout=newByteArrayOutputStream();ObjectOutputStreamout=newObjectOutputStream
随机试题
甲在某公司应聘时因害怕找不到工作而没有向招聘公司如实汇报其在20周岁时曾犯罪受过刑事处罚的事。
双回波SE序列获得的图像是
下列行为中,不适用代理的是( )。
根据国家经济贸易委员会于1999年10月27日发布的《关于开展危险化学品登记注册工作的通知》精神,危险化学品登记注册工作由()承担。
下列关于建设项目决策的表述,说法不正确的是( )。
监管部门应通过其监管工作努力消除风险。()
某上市公司本年度的净利润为20000万元。每股支付股利2元。预计该公司未来3年进入成长期,净利润第1年增长14%,第2年增长14%,第3年增长8%,第4年增长率下滑到5%并将持续下去。该公司一直采用固定股利支付率政策,并打算今后继续实行该政策。该公司没有
西方有一句俗语:罗马不是一天建成的。那么,如果提出“是什么塑造了现代世界?”这样一个问题,恐怕更不能用三言两语解释清楚。新近问世的《世界大历史》系列丛书,以5卷本近200万字打破了传统权威历史读物的体例藩篱,别出心裁地采用以“大事件”展开分析的方式,向读者
设A为4×3矩阵,η1,η2,η3是非齐次线性方程组Ax=β的3个线性无关的解,k1,k2为任意常数,则Ax=β的通解为
打开工作簿文件EXCEL.XLSX:(1)将Sheet1上作表命名为“商品销售情况表”,然后将工作表的A1:G1单元格合并为一个单元格,内容水平居中;计算“已销售出数量”(已销售出数最=进货数量-库存数量),计算“销售额(元)”,给出“销售额排名
最新回复
(
0
)