度量快速开发平台-专业、快速的软件定制快开平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
热搜: 部件 流程 SQL
查看: 2601|回复: 22

[分享] 窗体Excel数据导入(第二讲)

  [复制链接]

328

主题

3738

帖子

8565

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8565
QQ
发表于 2018-4-2 14:42:52 | 显示全部楼层 |阅读模式
本帖最后由 陈晓龙 于 2015-11-2 17:59 编辑

在第一讲我们说了导入窗体的开发。之前做得导入,只适合小批量数据导入,如果遇到数据很多时,效率就很低。比如,惠美达办公系统里面的医院基本信息,那里面包含很多医院,医院下面有很多科室,如果一家一家医院的导科室,效率就非常低。像这种情况,我们可以在科室表里面,增加医院名称字段,然后用科室表的主表ID去匹配医院表。

效果图如下:
222.png

导入窗体的代码如下:
1111.png

科室表的医院名称自动匹配医院表的医院名称:
QQ截图20151102135747.png

回复

使用道具 举报

348

主题

3590

帖子

8873

积分

论坛元老

Rank: 8Rank: 8

积分
8873
发表于 2018-4-2 17:54:12 | 显示全部楼层
实用,方便,强

点评

哥写得可以吧!  详情 回复 发表于 2018-4-3 09:32
若現在就覺得失望無力,未來那麽遠妳該怎麽扛...
————————————————————————致自己
回复 支持 反对

使用道具 举报

542

主题

5919

帖子

1万

积分

作者

Rank: 7Rank: 7Rank: 7

积分
13589
发表于 2018-4-2 18:27:33 | 显示全部楼层
不错,这个会大量应用的

点评

嗯嗯,对于那种业务系统,开始肯定会有很多原始数据。导入功能就派上用场了!  详情 回复 发表于 2018-4-3 09:36
回复 支持 反对

使用道具 举报

197

主题

1307

帖子

3566

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
3566
发表于 2018-4-2 19:29:00 | 显示全部楼层
这样就能导入更多呀

点评

是呀,本人实践了。效率大大提高!  详情 回复 发表于 2018-4-3 09:40
回复 支持 反对

使用道具 举报

78

主题

634

帖子

1598

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1598
发表于 2018-4-3 09:11:19 | 显示全部楼层
可以先定义一个变量,dim a=dt.Select("....")
然后后面再用
if a.Length>0 then
    dr["主表ID"]=a[0]
end if
这样计算机就不必执行两次Select了,可以提高程序执行效率。
回复 支持 反对

使用道具 举报

328

主题

3738

帖子

8565

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8565
QQ
 楼主| 发表于 2018-4-3 09:32:49 | 显示全部楼层
万望 发表于 2015-11-2 17:54
实用,方便,强

哥写得可以吧!
回复 支持 反对

使用道具 举报

328

主题

3738

帖子

8565

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8565
QQ
 楼主| 发表于 2018-4-3 09:36:36 | 显示全部楼层
张兴康 发表于 2015-11-2 18:27
不错,这个会大量应用的

嗯嗯,对于那种业务系统,开始肯定会有很多原始数据。导入功能就派上用场了!
回复 支持 反对

使用道具 举报

328

主题

3738

帖子

8565

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8565
QQ
 楼主| 发表于 2018-4-3 09:40:27 | 显示全部楼层
王爱东 发表于 2015-11-2 19:29
这样就能导入更多呀

是呀,本人实践了。效率大大提高!
回复 支持 反对

使用道具 举报

348

主题

3590

帖子

8873

积分

论坛元老

Rank: 8Rank: 8

积分
8873
发表于 2018-4-3 12:07:58 | 显示全部楼层

夸你两句上房揭瓦

点评

卧槽,居然不是真心话!  详情 回复 发表于 2018-4-3 12:43
若現在就覺得失望無力,未來那麽遠妳該怎麽扛...
————————————————————————致自己
回复 支持 反对

使用道具 举报

328

主题

3738

帖子

8565

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8565
QQ
 楼主| 发表于 2018-4-3 12:43:31 | 显示全部楼层
万望 发表于 2015-11-3 12:07
夸你两句上房揭瓦

卧槽,居然不是真心话!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|重庆度量科技  本站关键词:快速开发平台

GMT+8, 2018-11-21 07:24 , Processed in 0.487355 second(s), 38 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表