首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
已知一个名为“学生”的Access数据库,库中的表“Stud’’存储学生的基本信息,包括学号、姓名、性别和籍贯。下面程序的功能是:通过下图所示的窗体向“Stud”表中添加学生记录,对应“学号”、“姓名”、“性别”和“籍贯”的四个文本框的名称分别为tNo、t
已知一个名为“学生”的Access数据库,库中的表“Stud’’存储学生的基本信息,包括学号、姓名、性别和籍贯。下面程序的功能是:通过下图所示的窗体向“Stud”表中添加学生记录,对应“学号”、“姓名”、“性别”和“籍贯”的四个文本框的名称分别为tNo、t
admin
2009-03-17
61
问题
已知一个名为“学生”的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全国计算机二级
相关试题推荐
使用VC6打开考生文件夹下的源程序文件modi2.cpp。阅读下列函数说明和代码,完成空出部分程序。函数convert(char*strOct)的功能是将八进制转换为十进制。提示:要每一位转换,然后把转换后得到的数累加起来即可。注意:不能修改其他部分的
一个工作人员可以使用多台计算机,而一台计算机可被多个人使用,则实体工作人员与实体计算机之间的联系是( )。
下列关于派生类构造函数和析构函数的表述中,错误的是
软件调试的目的是()。
通过运算符重载,可以改变运算符原有的()。
运算符重载时不需要保持的性质是()。
使用VC++6.0打开考生文件夹下的源程序文件2.cpp。请完成函数fun(char*str,charch)的定义,本函数采用二分法,在已按字母次序从小到大排序的字符数组str中,查找字符ch,若ch在数组中,函数返回字符ch在数组中的下标,否则返回1。
使用VC6打开考生文件夹下的源程序文件modi3.cpp。通过继承完成输入到屏幕指定的信息:TestClassATestClassBTestClassC其中定义的类并不完整,按要求完成下列操作,将类的定义补充完整。
要利用C++流实现输入输出的各种格式控制,必须在程序中包含的头文件是()。
结构化程序设计的基本原则不包括( )。
随机试题
centroacinarcell
以下不是牙龈切除术适应证的是
隧道衬砌变形缝防水处理方法中不包括()。
1.背景某住宅小区工程基坑南北长400m,东西宽200m。沿基坑四周设置3.5m宽环形临时施工道路(兼临时消防车道),道路离基坑边沿3m,并沿基坑支护体系上口设置6个临时消火栓。监理工程师认为不满足相关规范要求整改。该工程中有一栋高层住宅结构为28层全
一般出口货物的报检时限应在()。
为庆祝某市建市30周年。该市政府要求市政府办公室做好有关工作。为此,市政府办公室以自己的名义发布了有关市容卫生、文明礼貌和清理整顿秩序的通告,要求全市各行业各单位和全体市民切实遵守执行。问题:该通告行为合法吗?为什么?(某省公开选拔党政领导干部公
DoctorsrecommendVitaminCforkeepingcolds______bay.
根据对哲学基本问题第一方面的回答,哲学可分为
Thefollowingisapassageaboutinventorsandtheirinventions.Newinventionsareappearingeverydaytomakeourlivesea
A、Itcoverssuchawiderangethatalotofeffortsareneeded.B、Itsbackgroundinformationistooobscuretocontinue.C、Itha
最新回复
(
0
)