论装8的重要性--</和你 e起 7天>No.4

易语言（e语言） 入入门……

NO.4

知识点：

编辑框-滚动条

文本型&整数型 变量

窗口的载入

计次循环首()

延迟

#换行符

源码：

.版本 2

.程序集 窗口程序集_启动窗口

.子程序 _按钮2_被单击
.局部变量 i, 整数型
.局部变量 a, 整数型

' 1
' 编辑框1.内容 ＝ “1”
.' 计次循环首 (9, i)
    ' 编辑框1.内容 ＝ 编辑框1.内容 ＋ #换行符 ＋ 到文本 (i ＋ 1)
.' 计次循环尾 ()

' 2
' a ＝ 0
' 编辑框1.内容 ＝ “”
.' 计次循环首 (10, )
    ' a ＝ a ＋ 1
    ' ' 编辑框1.内容 ＝ 到文本 (a)
    ' 编辑框1.加入文本 (到文本 (a) ＋ #换行符)
.' 计次循环尾 ()

' 3
编辑框1.内容 ＝ “”
.计次循环首 (10, i)
    编辑框1.加入文本 (到文本 (i) ＋ #换行符)
.计次循环尾 ()


.子程序 _按钮1_被单击
.局部变量 t, 文本型

' 1
.' 计次循环首 (3, )
    ' _启动窗口.标题 ＝ “Loading”
    ' t ＝ “”
    ' 延时 (500)
    .' 计次循环首 (6, )
        ' t ＝ t ＋ “.”
        ' _启动窗口.标题 ＝ “Loading” ＋ t
        ' 延时 (500)
    .' 计次循环尾 ()
.' 计次循环尾 ()
' _启动窗口.标题 ＝ “”
' 载入 (窗口1, , 真)


' 2
.计次循环首 (3, )
    _启动窗口.标题 ＝ “Loading”
    .计次循环首 (6, )
        _启动窗口.标题 ＝ _启动窗口.标题 ＋ “.”
        延时 (500)
    .计次循环尾 ()
.计次循环尾 ()
_启动窗口.标题 ＝ “”
载入 (窗口1, , 真)

本教程采用 觅风教材 ……