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

公安机关交通部门车辆管理所应当按照（）规定的程序办理机动车驾驶证业务。

A.《机动车驾驶证申领和使用规定》 

B.《机动车驾驶证业务工作规范》 

C.计算机管理系统 

D.机动车驾驶证信息采集和签注标准

答案

参考答案：B

单项选择题

下列行为中，构成无因管理的是（）。

A.未受委托替朋友招待客人

B.未成年人抢救落水儿童

C.主动代同事值夜班

D.代替配偶放弃继承权
查看答案
填空题

现有用户登录界面如下： 窗体中名为username的文本框用于输入用户名，名为pass的文本框用于输入用户的密码。用户输入用户名和密码后，单击“登录”名为login的按钮，系统查找名为“密码表”的数据表，如果密码表中有指定的用户名且密码正确，则系统根据用户的“权限”分别进入“管理员窗体”和“用户窗体”：如果用户名或密码输入错误，则给出相应的提示信息。

密码表中的字段均为文本类型，数据如下图所示。

单击“登录”按钮后相关的事件代码如下，请补充完整。 Private Sub login_Click() Dim str As String Dim rs AS New ADODB.Recordset Dim fd As ADODB.Field Set en=CurrentProjeet.Connection logname=Trim(Me!username) pass=Trim(Me!pass) If Len(Nz(logname))=0 Then MsgBox"请输入用户名" Else If Len(Nz(pass))=0 Then MsgBox"请输入密码" Else str="select * from密码表where用户名="&logname&"and密码="&pass rs.Open str，cn，adopenDynamic，adLockOptimistic，adCmdText If (14) Then MsgBox"没有这个用户名或密码输入错误，请重新输入" Me.username=" " Me.pass=" " Else Set (15) =rs.Fields("权限") If fd="管理员"Then DoCmd.Close DoCmd.OpenForm "管理员窗体" MsgBox "欢迎您，管理员" Else DoCmd.Close DoCmd.OpenForm "用户窗体" MsgBox "欢迎使用会员管理系统" End If End If End If End Sub
查看答案