首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列过程的功能是:将当前数据库文件中“学生表”的所有学生“年龄”加1。请在程序横线处填写适当的语句,使程序实现所需的功能。 Private Sub SetAgeplus2_Click() Dim cn AS New ADOD B.Conne
下列过程的功能是:将当前数据库文件中“学生表”的所有学生“年龄”加1。请在程序横线处填写适当的语句,使程序实现所需的功能。 Private Sub SetAgeplus2_Click() Dim cn AS New ADOD B.Conne
admin
2012-12-20
55
问题
下列过程的功能是:将当前数据库文件中“学生表”的所有学生“年龄”加1。请在程序横线处填写适当的语句,使程序实现所需的功能。
Private Sub SetAgeplus2_Click()
Dim cn AS New ADOD B.Connection
Dim rs AS New ADOD B.Recordset
Dim fd AS ADOD B.Field
Dim strConnect As String
Dim strSQL As String
Set cn=CurrentProject.Connection
strSQL=”Select年龄from学生表”
rs.Open strSQL,cn,adOpenDynamic,
adLockOptimistic,adCmdText
set fd=rs.Fields("年龄")
Do While NOt rs.EOF
fd:=__________。
rs.Update
rs.__________。
Loop
rs.Close
cn.Close
Set rs=Nothing
Set cn=Nothing
End Sub
选项
答案
fd+1 MoveNext。
解析
题目要求是将年龄加1,因此fd=fd+1,作为一个Do While循环,要将循环推下去,因此要填写关键词MoveNext。
转载请注明原文地址:https://kaotiyun.com/show/Exup777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下程序:#includeusingnamespacestd;classPoint{intx,y;public:Point(int
程序调试的任务是( )。
有如下程序段:inti=0,j=1;nt&r=i;//①r=j;//②int*p=&i;//③*p=&r;//④其中会产生编译错误的语句是()。
设c1和c2是类MyClass的对象,若将前缀运算符"--"和运算符"/"作为类MyClass的友元函数重载,则表达式--c1/c2等价于
关于函数重载,下列叙述中错误的是()。
下列叙述中正确的是
设c1和c2是类MyClass的对象,若将运算符"+"和"*"作为类MyClass的成员函数重载,则表达式c1+c2*c1等价于
关于关键字class和typename,下列表述中正确的是()。
某二叉树共有399个结点,其中有199个度为2的结点,则该二叉树中的叶子结点数为()。
下列关于线性链表的描述中,正确的是()。Ⅰ、只含有一个指针域来存放下一个元素地址Ⅱ、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件)Ⅲ、结点由两部分组成:数据域和指针域。
随机试题
在Access数据库中使用向导创建查询,其数据可以来自( )。
患者,男,50岁。因钝器击伤头部1小时后入院。患者昏迷、呕吐,双侧瞳孔不等大。血压180/102mmHg。行硬膜下血肿清除术+碎骨片清除术,留置引流管送回病房。术后引流管护理措施正确的是
依据《劳动法》的规定,禁止用人单位安排未成年工从事矿山、井下、有毒有害、国家规定的()体力劳动强度的劳动和其他禁忌从事的劳动。
( )是保险公司的主要资金来源。
作为一名从事信贷工作的从业人员,属于明显违反职业操守,有些还将带来相应的行政处罚或刑事责任的行为的有()。
2016年8月,某公司销售一批原材料,开具的增值税专用发票上注明的售价为15000元,增值税税率为17%,材料成本14000元,则该企业编制会计分录时,应借记“其他业务成本”科目的金额是()元。
因为[*],又因为f(0)=0,代入表达式得C=0,故[*]同理,由[*]于是[*]【思路探索】先积分,求出f(x)和g(x)的表达式,再求极限.注意在求极限时应尽量利用无穷小量的等价代换简化计算过程.
关于汇编语言程序()。
IsDianain?
Doctorsbaffledbyanunexplainedrashonpeople’searsorcheeksshouldbeonalertforaskinallergycausedtoomuch【M1】_____
最新回复
(
0
)