修改编辑框内容一键保存到数据库

当初为基础操作花了好长时间，老易们别嫌简单。

SQL ＝ “insert into 表名1(文本1) values ('” ＋ 编辑框1.内容 ＋ “')”
.如果 (_启动窗口.数据库连接1.执行SQL (SQL) ＝ 假)
信息框 (“添加记录失败！”, 0, )
.否则
编辑框1.内容 ＝ “”
信息框 (“添加记录成功”, 0, )