自卑感就是个人把自己的能力、品质评价偏低的一种消极的()。
A.自我感知
B.自我认识
C.自我评价
D.自我实践
参考答案:A
确定单桩竖向抗压承载力时,检测数据应有下列()资料。
A、应整理出数据记录表
B、应绘制竖向荷载-沉降(Q-s)曲线
C、桩身轴力分布图
D、沉降-时间对数(s-lgt)曲线
已知一个名为“学生”的Access数据库,库中的表“stud”存储学生的基本信息,包括学号、姓名、性别和籍贯。下面程序的功能是:通过下图所示的窗体向“stud”表中添加学生记录,对应“学号”、“姓名”、“性别”和“籍贯”的四个文本框的名称分别为tNo、tName、tSex、tRes。当单击窗体中的“增加”命令按钮(名为Command1) 时,首先判断学号是否重复,如果不重复则向“stud”表中添加学生记录;如果学号重复,则给出提示信息。
请依据所要求的功能,将如下程序补充完整。 Dim ADOcn As New ADODB.Connection Private Sub Form Load( )’打开窗口时,连接Access数据库Set ADOcn=CurrentProiect.Connection End Sub Private Sub Command1 Click( )’增加学生记录 Dim strSQL As String Dim ADOrs As New ADODB.Recordset Set ADOrs.ActiveConnectipn=ADOcn ADOrs.Open"Select学号From Stud Where学号=’’+tNo+’’ If Not ADOrs0 [14] Then ’如果该学号的学生记录已经存在,则显示提示信息 MsgBox’’你输入的学号已存在,不能增加!’’ Else ’增加新学生的记录 strSQL="Insert Into stud(学号,姓名,性别,籍贯) strSQL=strSQL+"Values("+tNo+","+tName+","+tSex+","+fires+") " ADOcn.Execute [15] MsgBox"添加成功,请继续!" End IfADOrs.Close Set APOrs=Nothing End Sub