下载APP
举一反三
【单选题】槐角丸主治
A.
轻度水.火.电灼烫伤，疮疡肿痛，皮肤损伤，创面溃烂等
B.
血热所致的肠风便血，痔疮肿痛
C.
湿热瘀阻所致的各类痔疮.肛裂，症见大便出血，或疼痛.有下坠感；亦用于肛周湿疹
D.
炎性.血栓性外痔及Ⅰ.Ⅱ期内痔瘀阻或湿热壅滞证
E.
脏腑实热，大肠火盛，肠风便血，痔疮瘘疮，湿热便秘，肛门肿痛
【单选题】患者，男，39岁，因久患痔疮，便血，有脱肛症状，断证为风邪热毒所致肠风下血，处方槐角丸。下列关于槐角丸说法错误的是（）
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