MDB数据库创建功能

LS ＝ 组合框_类型.取项目文本 (组合框_类型.现行选中项)
找 ＝ 寻找文本 (LS, “ ”, , 假)
类型 ＝ 取文本右边 (LS, 取文本长度 (LS) － 找)
.判断开始 (文本比较 (类型, “VARCHAR”, 假) ＝ 0)
.如果真 (长度框.内容 ＝ “”)
信息框 (“请输入此类型存储长度，最大值为255。”, #信息图标, “提示：”)
返回 ()
.如果真结束
.如果真 (到整数 (长度框.内容) ＞ 255)
信息框 (类型 ＋ “类型最长为255字节”, #错误图标, “错误：”)
返回 ()