下载APP
举一反三
【单选题】印鉴卡分为正卡和副卡(正、副卡编号一致)，下列说法正确的是( )。
A.
正卡1张，副卡1张
B.
正卡1张，副卡2张
C.
正卡1张，副卡3张
D.
正卡1张，副卡4张
【多选题】医疗机构取得印鉴卡应当具备的条件是()
A.
有专职的麻醉药品和第一类精神药品管理人员
B.
有专职的麻醉药品和精神药品管理人员
C.
有获得麻醉药品和第一类精神药品处方资格的执业医师
D.
有获得麻醉药品和第一类精神药品处方资格的执业药师
E.
有保证麻醉药品和第一类精神药品安全储存的设施和管理制度
【单选题】有如下事件过程：Private Sub Form_Load() Show Dim Arr() As Variant Arr = Array(1, 3, 5, 7, 9, 11, 13, 15) Call converse(Arr) For i = 0 To 7 Print arr(i); Next iEnd Sub 以上程序的功能是，通过调用Converse过程，将数组Arr中的元素逆序存放并输出...
A.
Private Sub converse(dim a() as Variant ) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
B.
Private Sub converse(dim a() as Variant) Dim T Dim J As Integer J = (LBound(A) + UBound(A)) / 2 For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
C.
Private Sub converse(a() As Variant) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
D.
Private Sub converse(a() As Variant) Dim T Dim J As Integer J = Int((LBound(A) + UBound(A)) / 2) For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
【单选题】印鉴卡片管理不正确做法是()
A.
管用分离及交接制度
B.
使用和保管为同一人
C.
已转入旧悬未取专用的印鉴卡片，应单独抽出、专夹保管
D.
妥善保管开户单位预留的印鉴卡片