创建自己的小题库
搜索
【多选题】
孩儿茶的功能是：
A.
收湿敛疮
B.
清热化痰
C.
止血
D.
止痛
E.
止泻
手机使用
分享
复制链接
新浪微博
分享QQ
微信扫一扫
反馈
收藏
举报参考答案：
举一反三
【单选题】儿茶
A.
体轻，质松，易折断，断面粉质，显疏松层纹
B.
质松而韧，横断面可见外层为海绵状物，内层为许多小室，室内有卵
C.
质硬而脆，断面平坦，外层白色，中间有亮棕色或亮黑色的丝线环4个
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.
娱乐功能
相关题目：
【单选题】儿茶
A.
体轻，质松，易折断，断面粉质，显疏松层纹
B.
质松而韧，横断面可见外层为海绵状物，内层为许多小室，室内有卵
C.
质硬而脆，断面平坦，外层白色，中间有亮棕色或亮黑色的丝线环4个
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.
娱乐功能
参考解析：
AI解析
重新生成
题目纠错 0
发布
