数据库 查询 命令

mxm943171328

.mdb格式的数据库  查询

     【姓名】  【性别】   【年龄】   【身高】
       张三1          男           30           176
       张三2          男           30           176
       张三3          男           30           176
       张三4          男           30           176


如果找到 张三1    那么年龄  加1
否则
怎么写

福仔

  

变量名	类 型	静态	数组	备 注
记录集	整数型
年龄	整数型

外部数据库1.打开MDB数据库 (“数据库位置”, , , , )
记录集 ＝ 外部数据库1.查询 (“sel删掉ect * from [数据库表名] where 【姓名】='张三1'”)
外部数据库1.到首记录 (记录集)
如果真 (外部数据库1.读 (记录集, “【姓名】”) ＝ “张三1”)
年龄 ＝ 外部数据库1.读 (记录集, “【年龄】”)
外部数据库1.关闭记录集 (记录集)
外部数据库1.执行 (“upd删掉ete [数据库表名] set 【年龄】=” ＋ 到文本 (年龄 ＋ 1) ＋ “ where 【姓名】='张三1'”, )

.版本 2<br /> <br /> .局部变量 记录集, 整数型<br /> .局部变量 年龄, 整数型<br /> <br /> 外部数据库1.打开MDB数据库 (“数据库位置”, , , , )<br /> 记录集 ＝ 外部数据库1.查询 (“sel删掉ect * from [数据库表名] where 【姓名】='张三1'”)<br /> 外部数据库1.到首记录 (记录集)<br /> .如果真 (外部数据库1.读 (记录集, “【姓名】”) ＝ “张三1”)<br />     年龄 ＝ 外部数据库1.读 (记录集, “【年龄】”)<br />     外部数据库1.关闭记录集 (记录集)<br />     外部数据库1.执行 (“upd删掉ete [数据库表名] set 【年龄】=” ＋ 到文本 (年龄 ＋ 1) ＋ “ where 【姓名】='张三1'”, )

大兔崽子

.版本 2

.子程序 _按钮1_被单击
.局部变量 i, 整数型
.局部变量 name, 文本型
.局部变量 s, 文本型

.如果真 (取反 (打开 (“数据库名称”, , , , , , )))
    信息框 (“数据库获取失败”, 0, , )
.如果真结束

.计次循环首 (取记录数 (), i)
    跳到 (i)
    name ＝ 到文本 (读 (“【姓名】”))
    .如果真 (name ＝ “张三1”)
        s ＝ 到文本 (读 (“【年龄】”))
        s ＝ 到文本 (到数值 (s) ＋ 1)
        写 (“【年龄】”, s)
    .如果真结束

.计次循环尾 ()




没测试  应该没有写错

韦贝贝

用如果（） 判断