子过程Plus完成对当前库中"教师表"的工龄字段都加1的操作。 Sub Plus( ) 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 【 】 rs.Update rs.MoveNext Loop rs.Close cn.Close Set rs = Nothing Set cn = Nothing End Sub 程序空白处【 】应该填写的语句是
- A.fd = fd + 1
- B.rs = rs + 1
- C.工龄 = 工龄 + 1
- D.rs.fd = rs.fd + 1
热度🔥449
参考答案：A
解析：打开微信小程序查看本题解析
扫码免费计算机二级刷题
2024年计算机等级考试题库
推荐
一个字符的标准ASCII码码长是（）。
教师管理数据库有数据表"teacher"，包括"编号"、"姓名"、"性别"和"职称"四个字段。下面程序的功能是：通过窗体向"teacher"表中添加教师记录。对应"编号"、"姓名"、"性别"和"职称"的4个文本框的名称分别为：tNo、tName、tSex和tTitles。当单击窗体上的"增加"命令按钮(名称为Command1)时，首先判断编号是否重复，如果不重复，则向"teacher"表中添加教师记录；如果编号重复，则给出提示信息。
Private ADOcn As New ADODB.Connection
Private Sub Form_Load()
'打开窗口时，连接Access本地数据库
Set ADOcn＝CurrentProject.Connection
End Sub
Private Sub Command0_Click()
'追加教师记录
Dim strSQL As String
Dim ADOcmd As New ADODB.Command
Dim ADOrs As New ADODB.Recordset
Set ADOrs.ActiveConnection＝ADOcn
ADOrs.Open "Select 编号 From teacher Where 编号＝'" ＋ tNo ＋ "'"
If Not ADOrs.EOF Then
MsgBox "你输入的编号已存在，不能新增加！"
Else
ADOcmd.ActiveConnection＝ADOcn
strSQL＝"Insert Into teacher(编号，姓名，性别，职称)"
strSQL＝strSQL＋"Values('"＋tNo＋"'，'"＋tname＋"'，'"＋tsex＋"'，'"＋ttitles＋"')"
ADOcmd.CommandText＝strSQL
ADOcmd.
MsgBox "添加成功，请继续！"
End If
ADOrs.Close
Set ADOrs＝Nothing
End Sub
按照功能要求，在横线上应填写的是( )。
设有定义：
int a; float b;
执行
scanf("%2d%f", &a, &b);
语句时，若从键盘输入
876 543.0
则a和b的值分别是
Excel工作表B列保存了11位手机号码信息，为了保护个人隐私，需将手机号码的后4位均用“*”表示，以B2单元格为例，最优的操作方法是：
