[填空题]下列子过程的功能是：当前数据库文件中的“学生表”的学生“年龄”都加1，请在程序空白处填写适当的语句，使程序实现所需的功能。
Private Sub SetAgePlus1_Click（　）
Dim a As DAO.Datahase
Dim rs As DAO.Recordset
Dim fd As DAO.Field
Set db=CurrentDb（　）
Set rs=db.OpenRecordset("学生表")
Set fd=rs.Fields("年龄")
Do While Not rs.EOF
rs.Edit
fd= (14)
rs.Update
(15)
Loop
rs.Close
db.Close
Set rs=Nothing
Set db=Nothing
End Sub

更多"下列子过程的功能是：当前数据库文件中的“学生表”的学生“年龄”都加1，"的相关试题:

[填空题]下列子过程的功能是：将当前数据库文件中“学生表”中的学生“年龄”都加1。请在程序空白处填写适当的语句，使程序实现所需的功能。
Private Sub SetAgePlus1_Click（　）
Dim db AS Dao．Database
Dim rs AS Dao．Recordset
Dim fd AS Dao．Field
Set db=CurrentDb（　）
Set rs=-db．OpenRecordset("学生表")
Set fd=rs.Fields("年龄")
Do While NOt rs.EOF
rs．Edit
fd=______
rs．Update
______
Loop
rs.Close
db.Close
Set rs=Nothing
Set db=Nothing
End Sub

查看答案

[填空题]下列子过程的功能是：将当前数据库文件中“学生表”的学生“年龄”都加1。请在程序空白处填写适当的语句，使程序实现所需的功能。
Private Sub SetAgePius1_Click（　）
Dim db AS DAO.Database
Dim rs AS DAO.Recordset
Dim fd AS DAO.Field
Set db=CurrentDb（　）
Set rs=-db.OpenRecordset("学生表")
Set fd=rs.Fields("年龄")
Do while Not rs.EOF
rs.Edit
fd=______
rs.Update
______
Loop
rs.Close
db.Close
Set rs=Nothing
Set dh=Nothing
End Sub

查看答案

[填空题]下列子过程的功能是：当前数据库文件中的“学生表”的学生“年龄”都加1，请在程序空白处填写适当的语句，使程序实现所需的功能。 Private Sub SetAgePlus1_Click（　） Dim a As DAO.Datahase Dim rs As DAO.Recordset Dim fd As DAO.Field Set db=CurrentDb（　） Set rs=db.OpenRecordset("学生表") Set fd=rs.Fields("年龄") Do While Not rs.EOF rs.Edit fd= (14) rs.Update (15) Loop rs.Close db.Close Set rs=Nothing Set db=Nothing End Sub

查看答案

[填空题]下列子过程的功能是：将当前数据库文件中“学生表”的学生“年龄”都加1。请在程序空白的地方填写适当的语句，使程序实现所需的功能。
Private Sub SetAgePlus1_Click（　）
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim fd As DAO.Field
Set db=CurrentDb（　）
Set rs=-db.OpenRecordset("学生表")
Set fd=rs.Fields("年龄")
Do While Not rs.EOF
rs.Edit
fd= (14)
rs.Update
(15)
Loop
rs.Close
db.Close
Set rs=Nothing
Set db=Nothing
End Sub

查看答案

[填空题]

下列过程的功能是：将当前数据库文件中“学生表”的所有学生“年龄”加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

fd = （）

查看答案

[单项选择]采用DAO完成对“教学管理.accdb”文件中“学生表”的学生年龄都加1的操作，程序空白处应填写的语句是______。
Sub SetAgePlus（　）
Dim ws As DAO.Workspace
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim fd As DAO.Field
Set db=CurrentDb（　）
Set rs=db.OpenRecordset("学生表")
Setfd=rs.Fields("年龄")
Do While Not rs.EOF
______
fd=fd+1
rs.Update
rs.MoveNext
Loop
rs.Close
db.Close
Set rs=Nothing
Set db=Nothing
End Sub
A. rs.Fields.Edit
B. rs.Edit
C. Fields.Edit
D. Edit

查看答案

[单项选择]采用DAO完成对“教学管理.mdb”文件中“学生表”的学生年龄都加1的操作，程序空白处应填写的语句是（）。
Sub SetAgePlus（　）
Dim WS As DAO.Workspace
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim fd As DAO.Field
Set db=CurrentDb（　）
Set rs=db.OpenRecordset("学生表")
Set fd=rs.Fields("年龄")
Do While Not rs.EOF
______
fd=fd+1
rs.Update
rs.MoreNext
Loop
rs.Close
db.Close
Set rs=Nothing
Set db=Nothing
End Suh
A. rs.Fields.Edit
B. rs.Edit
C. Fields.Edit
D. Edit

查看答案

[单项选择]采用ADO完成对“教学管理.mdb”文件中“学生表”的学生年龄都加1的操作，程序空白处应填写的是（）。
SubSetAgePlus（）
DimcnAsNewADODB.Connection
DimrsAsNewADODB.Recordset
DimfdAsADODB.Field
DimstrConnectAsString
DimstrSQLAsString
Setcn=CurrentProject.Connection
strSQL="Select年龄from学生表"
rs.OpenstrSQL，cn，adOpenDynamic，adLockOptimistic，adCmdText
Setfd=rs.Fields（"年龄"）
DoWhileNotrs.EOF
fd=fd+1
______
rs.MoveNext
Loop
rs.Close
cn.Close
Setrs=Nothing
Setcn=Nothing
EndSub
A. rs.Edit
B. rs.Update
C. Edit
D. Update

查看答案

[单项选择]有学生表(学号，姓名，所在系，年龄)，找出系内学生平均年龄高于全体学生平均年龄的系信息，正确的语句是______。
A. SELECT所在系，AVG(年龄)FROM学生表
B. SELECT所在系，AVG(年龄)FROM学生表
C. SELECT所在系，AVG(年龄)FROM学生表
D. SELECT所在系，AVG(年龄)FROM学生表

查看答案

[填空题]将学生表student中的学生年龄(字段名是年龄)增加1岁，应该使用的SQL命UPDATE student______

查看答案

[填空题]将学生表student中的学生年龄(字段名是年龄)增加1岁，应该使用的SQL命令是：
UPDATE student

查看答案

[填空题]将学生表student中的学生年龄(字段名是年龄)增加1岁，应该使用的SQL命令是： UPDATE student

查看答案

[单项选择]在学生表STUD中，查询年龄在20-至23岁之间的学生的姓名(XM)、年龄(SA) 和所在系(SD) ，实现该功能的正确SQL语句是______。 A) SELECTXM，SA，SD FROM STUD WHERE BETWEEN 20

B) SELECTXM，SA，SD FROM STUD WHERE SA BETWEEN23AND20；

C) SELECTXM，SA，SD FROM STUD WHERE SA NOTBETWEEN20 AND 23；

D) SELECTXM，SA，SD FROM STUD WHERE SA BETWEEN 20 AND 23；

查看答案

[填空题]下面这个Sub过程的功能是统计字符串中“a”的个数，请在空白处填上合适的代码完成程序。 Private Sub numCount（　） Dim hum As Integer s＄ = "software And hardware" num = Len(s$) For i = 1 To hum b$=______ If b$ = "a" Then x = x+1 Next i Print "x="; x End Sub

查看答案

我来回答:

提交