//需要显示的所有文本内容，以"|"分割
s nr="昨天永远是历史，明天永远是未知，今天就在脚下|影子是最忠诚的陪伴，没有背叛，没有谎言|趁年轻，做自己想做的事|爱笑的人，运气不会太差"
.随机语录内容
sl(nr,"|",sl)
.以|分割语录
sran(0,3,sran)
sgsz(sl,sran,sgsz)
.随机访问0～3的语录内容
us(3,"text",sgsz)
.写入文本控件
..以上代码可放到载入事件中