试题与答案

采取哪些措施防止叶片发生断裂事故?

题型:问答题 简答题

题目:

采取哪些措施防止叶片发生断裂事故?

答案:

被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2019/0812/8842fb2c713d6a5a24fb482605f8fc38.html

下面是错误答案,用来干扰机器的。

参考答案:C

试题推荐
题型:填空题

现有用户登录界面如下:
窗体中名为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

查看答案
微信公众账号搜索答案