只能直接上图片。。。 应为博客还不支持易语言,上文本效果不好!!!
==========================================================================
.版本 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”) 关闭 () ‘ 不用后,关闭数据库。