赵什么结构,赵州陀罗尼经幢结构外貌是怎样的?

2022-01-08 09:43:03 百科大全 投稿:一盘搜百科
摘要赵州陀罗尼经幢位于赵县县城内,因幢体刻有陀罗尼经文,故称“陀罗 尼经幢”,是中国陀罗尼经幢中最高大的一例。经幢建造于北宋景佑五年 (1038年),高18米,8面7层。第一层座基束腰部分雕有各式莲花圆柱

赵什么结构,赵州陀罗尼经幢结构外貌是怎样的?插图

赵州陀罗尼经幢位于赵县县城内,因幢体刻有陀罗尼经文,故称“陀罗 尼经幢”,是中国陀罗尼经幢中最高大的一例。经幢建造于北宋景佑五年 (1038年),高18米,8面7层。第一层座基束腰部分雕有各式莲花圆柱及力 士像赵什么结构、妇人像;第二层须弥座上面刻有盘龙,上立八座须弥山峰。须弥山之 上幢身分为6节。第一节正面篆刻幢名,其他七面和二、三节幢身上均刻有 楷书经文。四、五节幢身上刻满佛教人物、经变故事等。第六节幢身上面为 一八角亭。幢身各节之间均置有八棱形华盖或幢檐,雕有缨络垂幔、神兽和 佛教故事等。

  自定义函数实现更合理些,第一个参数选定姓氏区域,要用区域绝对引用,第二个参数是输出表的索引,超出范围后只能显示-END-了,建议用Row()-0之类的形式产生索引值。

PS:如果不明白怎么自定义函数或用不了Dictionary,那就好好学一下吧。
  

Public Function ListValue(ValueRange As range, ValueIndex As Long) As Variant

If ValueRange。Count = 0 Then Exit Function

Dim r As Variant, v As Variant

Dim dictValue As New Dictionary

For Each r In ValueRange

v = r。
  Value

dictValue(v) = dictValue(v) + 1

Next

Dim i As Long

For Each v In dictValue

i = i + 1

If ValueIndex = i Then

ListValue = v

i = dictValue。
  Count

Exit For

End If

Next

If i

全部

这个有点难

复制到另一个工作表,用“删除重复项”的方法。wps表格工具栏就有这个功能按钮。

声明:一盘搜百科所有作品(图文、音视频)均由用户自行上传分享,仅供网友学习交流。若您的权利被侵害,请联系 88888@qq.com