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

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
热搜: 部件 流程 SQL
查看: 19280|回复: 23
打印 上一主题 下一主题

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

  [复制链接]

328

主题

3738

帖子

8566

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8566
QQ
跳转到指定楼层
楼主
发表于 2020-4-2 14:42:52 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 陈晓龙 于 2015-11-2 17:59 编辑

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

效果图如下:


导入窗体的代码如下:


科室表的医院名称自动匹配医院表的医院名称:


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

348

主题

3572

帖子

9719

积分

论坛元老

Rank: 8Rank: 8

积分
9719
沙发
发表于 2020-4-2 17:54:12 | 只看该作者
实用,方便,强

点评

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

使用道具 举报

542

主题

5916

帖子

1万

积分

作者

Rank: 7Rank: 7Rank: 7

积分
13589
板凳
发表于 2020-4-2 18:27:33 | 只看该作者
不错,这个会大量应用的

点评

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

使用道具 举报

198

主题

1313

帖子

3806

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
3806
地板
发表于 2020-4-2 19:29:00 | 只看该作者
这样就能导入更多呀

点评

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

使用道具 举报

78

主题

634

帖子

1598

积分

管理员

Rank: 9Rank: 9Rank: 9

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

使用道具 举报

328

主题

3738

帖子

8566

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8566
QQ
6#
 楼主| 发表于 2020-4-3 09:32:49 | 只看该作者
万望 发表于 2015-11-2 17:54
实用,方便,强

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

使用道具 举报

328

主题

3738

帖子

8566

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8566
QQ
7#
 楼主| 发表于 2020-4-3 09:36:36 | 只看该作者
张兴康 发表于 2015-11-2 18:27
不错,这个会大量应用的

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

使用道具 举报

328

主题

3738

帖子

8566

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8566
QQ
8#
 楼主| 发表于 2020-4-3 09:40:27 | 只看该作者
王爱东 发表于 2015-11-2 19:29
这样就能导入更多呀

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

使用道具 举报

348

主题

3572

帖子

9719

积分

论坛元老

Rank: 8Rank: 8

积分
9719
9#
发表于 2020-4-3 12:07:58 | 只看该作者

夸你两句上房揭瓦

点评

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

使用道具 举报

328

主题

3738

帖子

8566

积分

作者

Rank: 7Rank: 7Rank: 7

积分
8566
QQ
10#
 楼主| 发表于 2020-4-3 12:43:31 | 只看该作者
万望 发表于 2015-11-3 12:07
夸你两句上房揭瓦

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

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-4-20 18:59 , Processed in 0.139719 second(s), 29 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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