在表单里init事件中写入代码：
PUBLIC i
i=0
thisform.timer1.Interval=1000
双击计时器进入timer事件中写入代码：
s="欢迎参加等级考试"
i=i+1
IF i<=LENC(s)
thisform.text1.Value=thisform.text1.value+SUBSTRc(s,i,1)
ELSE
i=1
thisform.text1.Value="欢"
ENDIF
在退出按钮CLICK事件代码：
thisform.timer1.Interval=0
