搜题请搜索小程序“爱下问搜题”
问题 选择题

二十国集团成员涵盖面广，代表性强。其构成兼顾了发达国家和发展中国家以及不同地域利益平衡，人口占全球的三分之二，国土面积占全球的60％，国内生产总值占全球的90％，贸易额占全球的80％。下列二十国集团的成员国中，既实行多党制，又是单一制的国家是：[ ]

A、美国    日本

B、法国    意大利

C、英国    中国

D、德国    澳大利亚

答案

答案：B

填空题

煤油的密度是0.8×103千克／米3，它表示的意义是                        ，一块大理石的质量为50克，体积为20厘米3，该大理石的密度为     千克/米3。
查看答案
填空题

已知一个名为“学生”的Access数据库，库中的表“stud”存储学生的基本信息，包括学号、姓名、性别和籍贯。下面程序的功能是：通过下图所示的窗体向“stud”表中添加学生记录，对应“学号”、“姓名”、“性别”和“籍贯”的4个文本框的名称分别为tNo、tNmae、tSex和tRes。当单击窗体中的“增加”命令按钮(名称为Commandl)时，首先判断学号是否重复，如果不重复则向“stud”表中添加学生记录；如果学号重复，则给出提示信息。


请依据所要求的功能，将如下程序补充完整。
Private Sub Form_Load()
打开窗口时，连接Access数据库
Set ADOcn=CurrentProject．Connection
End Sub
Dim ADOen AS New ADODB．Connection
Private Sub Command1_Click()
增加学生记录
Dim strSQL As String
Dim ADOrs As New ADODB．Recordset
Set ADOrs．ActiveConnection=ADOcn
ADOrs．Open"Select学号From Stud Where学号=" "+tNO+" "
If Not ADOrs．______Then
’如果该学号的学生记录已经存在，则显示提示信息
MsgBox"你输入的学号已存在，不能增加!"
Else
’增加新学生的记录
strSQL="Insert Into stud(学号,姓名,性别,籍贯)"
strSQL=strSQL+"Values(" "+tNoq+" "，" "+tName4+" "，" "+tSe +" "，" "+tRes+" ")"
ADOcn．Execute______
MsgBox "添加成功，请继续!"
End If
ADOrs．Close
Set ADOrs=Nothing
End Sub
查看答案