.版本 2 .程序集 窗口程序集1 .程序集变量 文本, 文本型 .子程序 __启动窗口_创建完毕 文本 = 读入文本 (打开文件 (取运行目录 () + “\文本.txt”, , ), ) 标签1.标题 = “” .子程序 _按钮1_被单击 .局部变量 数组, 文夲型, , "0" .局部变量 计次, 整数型 .如果真 (取文本长度 (文本) ≠ 取文本长度 (到文本 (到数值 (文本)))) 信息框 (“文本的内容不是数字”, 16, ) 结束 () .如果真结束 .计次循环艏 (取文本长度 (文本), 计次) 加入成员 (数组, 取文本中间 (文本, 计次, 1)) 数组 [计次] = 数值到大写 (到数值 (数组 [计次]), 真) 标签1.标题 = 标签1.标题 + 数组 [计次] .计次循環尾 () 写出文本 (打开文件 (取运行目录 () +
来源:三叶资源网欢迎分享,公众号:iisanye()