易语言数据库 edb

.版本 2
.支持库 shell

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

.子程序 创建数据库子程序1
.局部变量 字段信息, 字段信息, , "1"
.局部变量 要分割的文本, 字节集
.局部变量 分割的文本, 文本型, , "0"

' ##############先指定数据库，数据名称，数据类型，

字段信息 [1].名称 ＝ “文本1” ' 数据库名称
字段信息 [1].类型 ＝ #文本型 ' 数据库数据类型
字段信息 [1].最大文本长度 ＝ 20 ' 如果数据库数据信息保存类型为文本型，就要指定文本长度

' ##############这样数据库就先行指定了一行数据

创建 (取当前目录 () ＋ “\范例”, 字段信息) ' 这时创建数据库，会包括一个空行，把文本分割后的文件导入数据库这一空行

要分割的文本 ＝ 读入文件 (取特定目录 (#系统桌面) ＋ “\1.txt”) ' 把文件读出来，导入到变量（要分割的文本）

加入成员 (分割的文本, 分割文本 (到文本 (要分割的文本), #换行符, )) ' 这这里分割一下，文本都是一行一行的就用换行符来分割吧

写 (“文本1”, 分割的文本 [1]) ' 这里可以用计次循环来赋值

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/v3xyx22rv227jjfffxx.html