首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
已知一个名为“学生”的Access数据库,库中的表“Stud’’存储学生的基本信息,包括学号、姓名、性别和籍贯。下面程序的功能是:通过下图所示的窗体向“Stud”表中添加学生记录,对应“学号”、“姓名”、“性别”和“籍贯”的四个文本框的名称分别为tNo、t
已知一个名为“学生”的Access数据库,库中的表“Stud’’存储学生的基本信息,包括学号、姓名、性别和籍贯。下面程序的功能是:通过下图所示的窗体向“Stud”表中添加学生记录,对应“学号”、“姓名”、“性别”和“籍贯”的四个文本框的名称分别为tNo、t
admin
2009-03-17
78
问题
已知一个名为“学生”的Access数据库,库中的表“Stud’’存储学生的基本信息,包括学号、姓名、性别和籍贯。下面程序的功能是:通过下图所示的窗体向“Stud”表中添加学生记录,对应“学号”、“姓名”、“性别”和“籍贯”的四个文本框的名称分别为tNo、tName、tSex 和 tRes。当单击窗体中的“增加”命令按钮(名称为Commandl)时,首先判断学号是否重复,如果不重复则向“stud”表中添加学生记录;如果学号重复,则给出提示信息。
请依据所要求的功能,将如下程序补充完整。
Dim ADOcn As New ADODB.Connection
Private Sub Form_Load()
打开窗口时,连接Access数据库
Set ADOcn=CurrentProject.Connection
End Sub
Private Sub Command1_Click()
’增加学生记录
Dim strSQL As String
Dim ADOrs As New ADODB.Recordset
Set ADOrs.ActiveConnection=ADOcn
ADOrs.Open"Select 学号 From Stud Where 学号="+tNO+""
If Not ADOrs.【 】Then
’如果该学号的学生记录已经存在,则显示提示信息
MsgBox "你输入的学号已存在,不能增加!"
Else
增加新学生的记录
strSQL= "Insert Into stud (学号,姓名,性别,籍贯)"
strSQL=strSQL+"Values(’"+tNO+"’,’"+tName+"’,’"+tSex+"’,’"+tRes+"’)"
ADOcn.Execute 【 】
MsgBox"添加成功,请继续!"
End If
ADOrs.Close
Set ADOrs=Nothing
End Sub
选项
答案
EOF strSQL
解析
EOF指示当前记录位置位于Recordset对象的最后一个记录之后。属性返回布尔型值。使用BOF和EOF属性可确定Recordset对象是否包含记录,或者从一个记录移动到另一个记录时是否超出Recordset对象的限制。如果EOF属性为True,则没有当前记录。执行IF语句如果表中已有相同学号的记录,则显示“你输入的学号已存在,不能增加!”如果没有则向表中添加录入的记录s仕SQL。
转载请注明原文地址:https://kaotiyun.com/show/n85p777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下程序:#include<iostream>usingnamespacestd;intmain(){int.p;*p=9;cout<<”Thevalueatp:”<
有如下类定义和变量定义:classA{public:A(){data=0;}~A(){}intGetData()const{ret
使用VC6打开考生文件夹下的源程序文件modil.cpp,该程序运行时有错误,请改正程序中的错误。本题的功能是:从键盘输入字符串s,然后输出字符串S中的字符个数。注意:不要改动main函数,不能增行或删行,也不能更改程序的结构,错误的语
使用VC6打开考生文件夹下的源程序文件modi.epp,该程序运行时有错误,请改正其中的错误,使得程序正确运行。程序输出:S1:n=20s2:n=10执行s3.add(s1,s2)s3:n=30s
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
在三级模式之间引入两层映像,其主要功能之一是()。
请打开考生文件夹下的解决方案文件proj3,其中声明了ValArray类,该类在内部维护一个动态分配的整型数组。ValArray类的复制构造函数应实现对象的深层复制。请编写ValArray类的复制构造函数。在main函数中给出了一组测试数据,此种情况下程序
结构化程序设计的基本原则不包括( )。
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为()。
请使用VC6或使用【答题】菜单打开考生文件夹proj2下的工程proj2,该工程中包含一个程序文件main.cpp,其中有坐标点类point、线段类Line和三角形类Triangle的定义,还有main函数的定义。程序中两点间距离的计算是按公式d=实现的,
随机试题
肾透明细胞癌CT增强扫描的强化特点是
某基层医疗机构要转型为社区卫生服务中心为防治冠心病,该社区卫生服务中心所采取的下列措施中,属于第一级预防的措施是
甲、乙、丙成立一有限合伙企业,甲是有限合伙人。2017年5月,甲持合伙企业合同专用章与丁公司签订一份购买100台冰箱的合同,丁公司交付冰箱后。合伙企业迟迟不交付货款。则()。
据史书载,以下均为秦朝刑事罪名。下列哪一选项最不具有秦朝法律文化的专制特色?(2011年试卷一第16题)
因仓库货物已满,甲公司与乙公司商定将一批钢材存在乙公司的仓库内,甲公司一直按期支付保管费用。后甲公司向乙公司购买机器设备一套,到期未支付货款,乙公司将甲公司存放的钢材留置,下列说法正确的是()。
关于自动转存的说法,错误的是()。
问题解决过程一般可以分为()
(三) 1995年10月6日,吴某到厂长办公室要求分房。厂长刘某以要开会为由令吴某离开。吴某不从,刘某遂不耐烦,向外推吴某。吴某在后退中不慎将办公桌撞倒,打破茶杯。刘某见状大怒,向公安机关报警。公安干警赶到后,不容吴某分辩将其带到北桥派出所。第
Individualsandbusinesseshavelegalprotectionforintellectualpropertytheycreateandown.Intellectualproperty【C1】______c
Undertheagreement,thenuclearwarheadswillbe
最新回复
(
0
)