下载APP
【单选题】
龙胆泻肝丸的功能是
A.
清肝胆，利湿热
B.
散风清热，泻火止痛
C.
化瘀凉血止血
D.
清热解毒，凉血利咽
E.
散风止痛
参考答案：
参考解析：
刷刷题刷刷变学霸
举一反三
【单选题】宜选用龙胆泻肝丸的是()
A.
某男，34岁，因胃肠积热而头痛眩晕、目赤耳鸣、口燥咽干、大便燥结
B.
某男，42岁，因风热上攻、肺胃热盛而头晕目眩、牙齿疼痛、口舌生疮、大便秘结、小便短赤
C.
某男，50岁，因肝胆湿热而头晕目赤、耳鸣耳聋、胁痛口苦、尿赤涩痛
D.
某女，37岁，因火毒血热而身热烦躁、目赤口疮、牙龈肿痛、吐血、略血、大便秘结
E.
某女，25岁，因火热内盛而咽喉肿痛、牙龈肿痛、口舌生疮、目赤肿痛
【单选题】有如下事件过程：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