精易论坛
标题:
大神看下我哪错了
[打印本页]
作者:
peng3726
时间:
2013-6-30 20:41
标题:
大神看下我哪错了
[e]
.版本 2.程序集 窗口程序集1.子程序 _按钮_创建数据库_被单击子程序_建数据库 ().子程序 子程序_建数据库.局部变量 字段表, 字段信息, , "3".如果真 (文件是否存在 (取运行目录 () + “\” + #人事档案) = 假) .如果真 (信息框 (“人事档案不存在,是否创建数据库!”, #询问图标 + #是否钮, ) = #否钮) 信息框 (“系统将会退出!”, #错误图标, ) 结束 () .如果真结束 字段表 [1].名称 = #姓名 字段表 [1].类型 = #文本型 字段表 [1].最大文本长度 = 8 字段表 [2].名称 = #年龄 字段表 [2].类型 = #文本型 字段表 [2].最大文本长度 = 8 字段表 [3].名称 = #工资 字段表 [3].类型 = #文本型 字段表 [3].最大文本长度 = 8 .如果真 (创建 (取运行目录 () + “\” + #人事档案, 字段表) = 假) 信息框 (“创建人事档案数据库失败!”, #错误图标, “错误”) 结束 () .如果真结束 信息框 (#左引号 + #人事档案 + #右引号 + “数据库创建成功!”, #信息图标, ).如果真结束.子程序 _按钮_显示全部数据_被单击.局部变量 计次, 整数型子程序_添加表头 ()到首记录 ().计次循环首 (取记录数 (), 计次) 子程序_读取当前记录 () 跳过 ().计次循环尾 ().子程序 子程序_添加表头数据源1.删除行 (1, 数据源1.取行数 ()).如果真 (数据源1.插入行 (1, 1) = 假) 返回 ().如果真结束数据源1.置文本 (1, 1, “姓名”)数据源1.置文本 (1, 2, “年龄”)数据源1.置文本 (1, 3, “工资”)数据源1.置对齐方式 (1, 1, 数据源1.取行数 (), 数据源1.取列数 (), #中中)数据源1.加线条 (1, 1, 数据源1.取行数 (), 数据源1.取列数 (), 1 + 2 + 4 + 8 + 16 + 32).子程序 子程序_读取当前记录数据源1.添加行 (1)数据源1.置文本 (数据源1.取行数 (), 1, 读 (#姓名))数据源1.置文本 (数据源1.取行数 (), 2, 读 (#年龄))数据源1.置文本 (数据源1.取行数 (), 3, 读 (#工资))数据源1.置对齐方式 (1, 1, 数据源1.取行数 (), 数据源1.取列数 (), #中中)数据源1.加线条 (1, 1, 数据源1.取行数 (), 数据源1.取列数 (), 1 + 2 + 4 + 8 + 16 + 32).子程序 _按钮_打开数据库_被单击.如果 (打开 (#人事档案, “人事档案”, , , , , ) = 假) 信息框 (“人事档案数据库打开失败!”, #错误图标, “错误”) 结束 ().否则 信息框 (“人事档案数据库打开成功!”, #信息图标, “成功”).如果结束.子程序 _按钮_添加信息_被单击载入 (窗口_添加, , 真)
[/e]
大神帮看下错在哪?
作者:
‘一叶知秋
时间:
2013-6-30 20:47
把源码已附件方式上传比较好 好乱的啊我这里
作者:
无\月
时间:
2013-6-30 20:53
看到这些代码,果然是需要大神才能解决!
作者:
elang136
时间:
2013-6-30 20:59
大神也没精力去解决你这些乱码,请上传源码,解决你的乱码比解决问题难多了
作者:
提拉米苏god
时间:
2013-6-30 21:21
沙发说的对,看的蛋疼。。。
作者:
Hoibben
时间:
2013-6-30 21:44
我不是大婶,但是我可以告诉你,你的代码没整理好就已经错了,其他的就先不说了,嘎嘎。。。
作者:
Farmer°
时间:
2013-6-30 21:50
好乱啊.....
作者:
s19876699
时间:
2013-7-1 10:17
我觉得你才是大神,这样你都能写的出来,佩服之至。
欢迎光临 精易论坛 (https://125.confly.eu.org/)
Powered by Discuz! X3.4