只能直接上图片。。。 应为博客还不支持易语言，上文本效果不好！！！

 

==========================================================================

.版本 2

.子程序 _按钮2_被单击 .局部变量 字段信息表, 字段信息, , "4", edb数据库支持的字段型变量,前面的4表示该类型为一维数值，最大4段信息。 .局部变量 姓名拼音, 文本型 .局部变量 i, 整数型 .局部变量 姓名, 文本型

' 为字段信息这个数组的每一个元素逐一赋值，edb规定其每一个元素又包括三个内容，分别是：【姓名】，【类型】，【最大文本长度】。 字段信息表 [1].名称 ＝ “姓名” 字段信息表 [1].类型 ＝ 10  ' 这里的10表示文本类型，可以直接用“#文本型”赋值，一样的效果。 字段信息表 [1].最大文本长度 ＝ 6

字段信息表 [2].名称 ＝ “拼音” 字段信息表 [2].类型 ＝ 10 字段信息表 [2].最大文本长度 ＝ 3

字段信息表 [3].名称 ＝ “年龄” 字段信息表 [3].类型 ＝ 8  ' 这里的8表示时间日期型，不知道长度，就不管最大文本长度。

字段信息表 [4].名称 ＝ “电话” 字段信息表 [4].类型 ＝ 10 字段信息表 [4].最大文本长度 ＝ 11

创建 (取当前目录 () ＋ “\ghost.edb”, 字段信息表)  ' 以扩展名为edb的方式创建一个人数据库文件。 打开 (取当前目录 () ＋ “\ghost.edb”, , , , , , )  ' 打开数据库，程序自动把打开的数据库关联为当前数据库。 姓名 ＝ “平近习” i ＝ 1 ' 循环把姓名的每个字的拼音的首字母取出来。这里只测试用的3个字的名字。 .计次循环首 (3, )     姓名拼音 ＝ 姓名拼音 ＋ 取文本左边 (取拼音 (取文本中间 (姓名, i, 2), 1), 1)  ' 【取拼音】只能每次输入一个字，它的第二个参数表示那种有多音的情况，一般就输1，     ' 【取文本中间】和【取文本左边】要注意汉字是两个字符，因此一个一个字取出的时候，一般第二个参数用1，3，5... 第三个参数用2表示每次取两个字节及一个字。     i ＝ i ＋ 2 .计次循环尾 () 加记录 (姓名, 姓名拼音, [1970年1月1日], “4389090980”) 关闭 ()  ' 不用后，关闭数据库。