e4a依中间值反转取值的上和下写法

e4a依中间值反转取值的上N个和下写法N个


函数 取上下(欲取位置 为 文本型,取上量 为 整数型,取下量 为 整数型)为 文本型
	变量 每一行 为 文本型()
	变量 I 为 整数型
	变量 总行数 为 整数型
	变量 后五前 为 整数型
	每一行 = 分割文本(欲取位置,"\n")
	总行数 = 取数组成员数(每一行)
	后五前 = 总行数 - 取下量
	判断循环首 I < 取数组成员数(每一行)
		如果 I < 取上量 则
			取上下 = 取上下 & 取文本左边(每一行(I),1) ''取顶部7个
		结束 如果
		I = I + 1
	判断循环尾
	I= 0
	判断循环首 I < 取数组成员数(每一行)
		如果 I > 后五前 - 1 则
			取上下 = 取上下 & 取文本左边(每一行(I),1) ''取底部5个
		结束 如果
		I = I + 1
	判断循环尾
	I= 0
	'''''''''''写法 编辑框4.内容 = 编辑框4.内容 & 取上下(编辑框1.内容,到整数(编辑框6.内容),到整数(编辑框7.内容))
结束 函数
1,102 Views
分享你的喜爱
linwute
linwute

我要像梦一样自由,像大地一样宽容;
在艰辛放逐的路上,点亮生命的光芒;
我要像梦一样自由,像天空一样坚强;
在曲折蜿蜒的路上,体验生命的意义;

留下评论

您的邮箱地址不会被公开。 必填项已用 * 标注