患者女性，12岁，因“右肘脱位整复后4周，关节肿痛、活动受限”来诊。查体：右肘肿胀，

(13分)

纪念币既具有一般货币的职能，又具有纪念意义。为庆祝建国60周年，中国人民银行于2009年9月16日发行了中华人民共和国成立60周年金银纪念币一套。该套纪念币共5枚，其中金币3枚，银币2枚，均为中华人民共和国法定货币。

请结合自己所学的知识，回答下面的问题。

(1)什么是货币?货币的基本职能有哪些?(5分)

(2)国家能随意发行货币吗?为什么?(8分)

促红细胞生成素(EPO)的产生部位主要是

A．脾

B．肾

C．肝

D．肺

E．骨髓

胎儿头颅部超声检查如图，最可能的诊断是()

A．正常声像图

B．脑积水

C．先天性蛛网膜囊肿

D．孔洞脑

E．小脑蚓部缺损

水泵密封环的作用是什么？

现有用户登录界面如下：
窗体中名为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 Then
MsgBox"没有这个用户名或密码输入错误，请重新输入"
Me.username=" "
Me.pass=" "
Else
Set =rs.Fields("权限")
If fd="管理员"Then
DoCmd.Close
DoCmd.OpenForm "管理员窗体"
MsgBox "欢迎您，管理员"
Else
DoCmd.Close
DoCmd.OpenForm "用户窗体"
MsgBox "欢迎使用会员管理系统"
End If
End If
End If
End Sub