单项选择题
已知“教务管理.accdb”数据库为当前数据库,且该数据库中有“教师”表,该表有“职工号”、“姓名”、“性别”和“职称”等4个字段。下面程序的功能是:
通过窗体向“教师”表中添加教师记录。对应“职工号”、“姓名”、“性别”和“职称”的4个文本框的名称分别为:tJszgh、tJsxm、tJsxb和tJszc。当单击窗体上“增加”命令按钮(名为Command0)时,先判断“职工号”是否重复,如果不重复,则向“教师”表中添加教师记录;如果“职工号”重复,则给出提示信息。
有关代码如下:
Private Sub Command0_Click()
Dim ADOcn As New ADODB.Connection
Dim ADOcmd As New ADODB.Command
Dim ADOrs As New ADODB.Recordset
Dim strSQL As String
Set ADOcn = CurrentProject.Connection
ADOrs.Open "Select 职工号From 教师 Where 职工号 ='" + tJszgh + "'" , ADOcn
If Not ADOrs.EOF Then
MsgBox "你输入的职工号已存在!"
Else
ADOcmd.ActiveConnection = ADOcn
strSQL = "Insert Into教师(职工号,姓名,性别,职称)"
strSQL = strSQL + "Values('" + tJszgh + "','" + tJsxm + "','" + tJsxb + "','" + tJszc + "')"
ADOcmd.CommandText = strSQL
【 】
MsgBox "记录添加成功!"
End If
ADOrs.Close
Set ADOrs = Nothing
End Sub
按上述功能要求,在程序代码的【 】处应填写的是______。
A.
ADOcn.Execute()
B.
ADOcn.Execute
C.
ADOcmd.Execute()
D.
ADOcmd.Execute
点击查看答案&解析
相关考题
