从土壤质地组成来看，最适合作物生长的是______。

对流通业态变化具有决定性作用的主要因素不包括( )。

A．经济发展水平和市场需求变化
B．人口流向和流量
C．销售技术和科技革命的发展
D．竞争方式一贯性及竞争程度的减弱

想一想上辈人，下乡创业时______，多不容易。

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 cn=CurrenfProjet.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.Openstr，cn，adOpenDynamic，adLockOptimistic，adCmdText

If (14) Then

MsgBox "没有这个用户名或密码输入错误，请重新输入"

Me username=""

Mepass=""

Else

Set (15) =rs.Fields("权限")

If fd="管理员" Then

DoCmd.Close

DoCmd.OpenForm "管理员窗体"

MsgBox "欢迎您，管理员"

Else

DoCmd.Close

DoCmdOpenForm "用户窗体"

MsgBox "欢迎使用会员管理系统"

End If

End If

End If

End Sub

（14）是（）

我国古代图书主要按经、史、子、集四部分类法进行分类，下列选项中应归入史部的一项是（）。

A.《左传》

B.《楚辞》

C.《吕氏春秋》

D.《元和郡县图志》

扭曲环