一个关于TEXT控件拆分的有关问题

一个关于TEXT控件拆分的问题
问题描述：如今有一个TEXT空间，里面有17数据，比如：
AAA
BBBB
CCCCC
DDDDD
EEEEEE
FFF.FFFF
EEEEE

如何把每一行数据输出到一个TEXT窗口或者LABEL里呢？同时将指定的15,16,17行数据放入剪贴板呢？

[解决办法]
For i = 0 To UBound(a)