下列过程的功能是:将当前数据库文件中“学生表”的所有学生“年龄”加1。 Private Sub SetAgeplus2_Click( ) Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim fd As ADODB.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 横线处应填写的内容是( )。A.fd-1 0penB.fd+1 closeC.fd+1 MoveNextD.fd-1 Recordset
下列过程的功能是:将当前数据库文件中“学生表”的所有学生“年龄”加1。 Private Sub SetAgeplus2_Click( ) Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim fd As ADODB.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 横线处应填写的内容是( )。
A.fd-1 0pen
B.fd+1 close
C.fd+1 MoveNext
D.fd-1 Recordset
相关考题:
下列子过程的功能是:当前数据库文件中的 “ 学生表 ” 的学生 “ 年龄 ” 都加 1 ,请在程序空白处填写适当的语句,使程序实现所需的功能Private Sub SetAgePlus1_Click()Dim a As DAO.DatabaseDim rs As DAO.RecordsetDim fd As DAO.FieldSet db = CurrentDb()Set rs = db.OpenRecordset(" 学生表 ")Set fd = rs.Fields(" 年龄 ")Do While Not rs.EOFrs.Editfd =____[14]____rs.Update___[15]___Looprs.Closedb.CloseSet rs = NothingSet db = NothingEnd Sub
将“学生”表中,所有女学生的“年龄”加1,正确的语句是( )。A.UPDATE学生FOR年龄=年龄+1WHERE性别="女"B.UPDATE学生WHERE年龄=年龄+1ON性别="女"C.UPDATE学生SET年龄=年龄+1WHERE性别="女"D.UPDATE学生SET年龄=年龄+1FOR性别="女"
下列子过程的功能是:将当前数据库文件中“学生表”的学生“年龄”都加1。请在程序空白的地方填写适当的语句,使程序实现所需的功能:Private Sub SetAgePlus1_Click()Dim db As DAO.DatabaseDim rs As DAO.RecordsetDim fd As DAO.FieldSet db = CurrentDb()set rs = db.OpenRecordset("学生表")Set fd= rs.Fields("年龄")Do While Not rs.EOFrs.Editfd =【 】rs.Update【 】Looprs.Closedb.CloseSet rs = NothingSet db = NothingEnd Sub
下列程序段的功能是实现“学生”表中“年龄”字段值加1,空白处应填入的程序代码是( )。Dim Str As String Str=" " Docmd.RunSQL StrA.年龄=年龄+1B.Update学生Set年龄=年龄+1C.Set年龄=年龄+1D.Edit学生年龄=年龄+1
下列程序段的功能是实现“学生”表中“年龄”字段值加1:Dim Str As String Str=””Docmd.RunSQL Str空白处应填入的程序代码是( )。A.年龄=年龄+1B.Update学生Set年龄=年龄+1C.Set年龄=年龄+1D.Edit学生Set年龄=年龄+1
下列程序段的功能是实现“学生”表中“年龄”字段值加1。 DimStrAsStringStr="_________"Docmd.RunSQLStr空白处应填入的程序代码是( )。A.年龄=年龄+1B.Update学生set年龄=年龄+1C.Set年龄=年龄+1D.Edit学生Set年龄=年龄+1
将“学生”表中,所有女学生的“年龄”加l,正确的语句是( )。A.UPDATE学生FOR年龄=年龄+l WHERE性刚 =”女”B.UPI)ATE学生WHERE年龄一年龄十l ON性别 =”女”C.UPDATE学生SET年龄=年龄+1 WHERE性别 =”女”D.UPDATE学生SET年龄=年龄+l FOR.性别 =”女”
将“学生”表中,所有女学生的“年龄”加1,正确的命令语句是( )。A.UPDATE 学生 FOR 年龄=年龄+1 WHERE 性别="女"B.UPDATE 学生 WHERE 年龄=年龄+1 ON 性别="女"C.UPDATE 学生 SET 年龄=年龄+1 WHERE 性别="女"D.UPDATE 学生 SET 年龄=年龄+1 FOR 性别="女"