说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

优化OLE的调用频率-VB资料

HTML文档下载 WORD文档下载 PDF文档下载
优化OLE的调用频率-VB资料

?在VB5.0中,OLE调用功能大大增强,程序员的调用次数也自然地随之增加,显然,
优化OLE的调用对提高系统效率
有着不可低估的意义。下面提供三则优化OLE调用技巧供参考。

?1.预先定义专用对象,减少OLE调用次数,提高程序效率
在VB中进行OLE功能调用时,一般需要重复使用“对象、属性”这类语句,有时连
接对象很多,语句较长。比如,
要想获得某个数据库中数据表字段名称的OLE功能调用语句可能这样:
DBEngine,Workspaces(0).DataBases(0).RecordSet.Fields(0).Name
上面语句中的每个点(.)都需要进行一次OLE功能调用。如果我们想列出所有的字段
名称,一般情况下程序如下:
ForI%=0ToDBEngine.WorkSpaces(0).Database.RecordSet.Fields.Count-1
PrintDBEngine.WorkSpaces(0).Database.RecordSet.Fields(I%).Name
Next
上面这段程序用循环的方式将所有字段名称列出来,每一个循环需要有10次OLE调
用(10个点),假设有10个字段,
则完成这个循环需要进行100次OLE调用。从上面的程序中我们可以看到OLE调用语
句的前面部分对象都是一样的,
我们可以考虑将其预先定义好,这样就可以减少OLE调用次数,提高效率,将程序
改写如下:
DimDBAsDatabase
DimSAsFields
DimFAsField
SetDB=DBEngine.Workspaces(0).OpenDatabase("biblio.mdb")
SetX=DBEngine.Workspaces(0).Databases(0).TableDefs(0).Fields
ForEachFInX
PrintF.Name
Next
改写后的程序在完成定义对象时使用6次OLE调用,循环过程需要10次(10×1),完
成整个任务只需要16次,
和上面的程序比起来效率大大提高了。
 
?2.利用WITH语句来减少OLE调用次数
比如,我们通过OLE功能定义某个字段的属性语句可能这样:
DBEngine.WorkSpaces(0).Database.RecordSet.Fields(0).Name="Book"
DBEngine.WorkSpaces(0).Database.RecordSet.Fields(0).Required=True
DBEngine.WorkSpaces(0).Database.RecordSet.Fields(0).Size=20
DBEngine.WorkSpaces(0).Database.RecordSet.Fields(0).Type=db Text
DBEngine.WorkSpaces(0).Database.RecordSet.Fields(0).Value="MSDOS"
上面的语句运行效率不高,且书写繁琐,利用WITH语句改写如下:
WithDBEngine.WorkSpaces(0)
.Database.RecordSet.Fields(0)
.Name="BOOK"
.Required=True
.Size=20
.Type=dbText
.Value="MSDOS"
EndWith
改写后的程序书写简单、效率也高(OLE调用次数少)。
 
3.利用服务方程序的宏来减少OLE功能调用次数
如果要从VB中通过OLE调用WORD中的某些功能来完成某项任务,首先在WORD中将所
要使用的功能用记录宏
的方式记录成一个宏(根据实际情况可修改记录后的宏代码),然后再用VB的OLE功
能调用WORD来执行这个宏,
这样可避免反复用VB的OLE功能调用WO
虚拟现实,正在改变什么? 一周消息树:腾讯CTO张志东离职 未来希望帮技术人成长 又见真人CS:13th Lab推出移动FPS对战平台 前瞻、教育、创业:Maker Faire演讲嘉宾揭晓 提高API采用率的六大方法 一周热点:以咖啡店为例演示Web应用程序扩展 中国云计算大会PPT集萃(四):数据安全与实际应用挑战 CDN前景光明,SDN发展的驱动力源于对产业的颠覆 Android、WP双系统若要发展 难题不断 即将于下周召开的微软Build 2014六个愿望清单 【独家专访】腾讯陈磊:你不知道腾讯对开源有多爱 地下数据交易网站Rescator被黑,疑似Target报复 Spark独门秘籍:打造结构一体化、功能多元化的高效数据流水线 【走进支付宝】重磅嘉宾!历届“走进企业”回顾 【OSTC讲师专访】腾讯TDW项目:开源的分布式数据仓库 ID爆发的物联网时代,我们该如何管理手中的数百个账户 取代Google Maps?苹果大幅优化Apple Maps用户体验 中交兴路系统架构师杨晓明:Hadoop+Storm+ HBase…,打造交通行业创新型服务 雨果·巴拉的第二春:我与小米的那些事儿 为什么Android Wear能统领智能手表领域? LinkedIn缘何抛弃Ruby,转投NodeJS怀抱 【OSTC讲师专访】九秒社团李明:开源对游戏产业的渗透与帮助 IBM 2014中国论坛:挖掘新互联网时代下“智慧企业”的发展之路 Facebook工程部副总裁Cory Ondrejka谈企业在早期所遇到的管理瓶颈 小团队管理工具选择:不需要大而全 《近匠》聚合CEO左磊:基础数据免费,API开放 IDC:HTML5与原生应用之争还将长存 不甘称臣,Google誓要击败Amazon 【OSTC讲师专访】腾讯追风(QcloudMna):开源移动加速SDK Google Go:一门为云而生的编程语言 3月26日:没有Larry Page,就没有今天的Google 软件发布:美萍安全卫士密码破解器 软件发布:整人蛀虫 SQL SERVER存储过程的问题!!!! 软件发布:词痴 软件发布:自动关机 软件发布:南易彩票选号系统 pfc基类庫是纯英字,谁有中文的。 软件发布:精灵英文输入法(写代码助手) 软件发布:QQSpy密码探测器98版 for 0425 高手请,为何在不同地方打开对话框会有不同的结果呢? 软件发布:《商务导航》 软件发布:amp player 豪华版 如何关闭XCOPY打开的窗口,详细一点 请援手:pfc程序如何再升级?(关于版本更新) 谁是高手,一个事务处理问题。 大家来聊聊:JBUILDER5比JUILDER4在那方面改进了!? 我们这个破烂小公司成天TMD瞎折腾! 根据用户名和密码登陆的问题! 大家来说一下,中程和高程证书在找工作时作用怎样 Dialog上放了一个group box,请问如何动态改变group box框框中的整个颜色?急呀! 用程序向表中插数据的问题? 怎样制作一个类似日历的控件?快快快! 做个调查:在上海delphi的前景如何?现在工资怎么样? 如何给graph控件的values赋值. c++Builder的悲哀历程,求助帮忙,各位大虾多指点 建议封杀e_lion,影响看贴情绪!杀无赦!!! 请教高手:我用vc6.0向导生成了一个Utility Project,不想用MFC AppWizard(exe)生成的基本类,可我无法编译我写的cpp(带winMain函数)文件,为何? 无任何理由,第一个进来者300分。当场结帐。 各位,是如何调试自己编写的servlet的,我使用jswdk每次,修改servlet后都要重启一次服务器,有没有什么好法子。 不看不知道。 在写servlet时,如果要输出一段文字的问题。 “瑞星2001病毒实时间控装载失败”? 既然看到了,不妨进来“坐坐”! (关于串口) 看看我的计划《程序员生活》, 数据库小问题 有谁用过Delphi6带的InstallShield Express - Borland Limited 请赐教:我只想建一个空工程,里面什么类也没有,只望往加我写的类(带winMain 函数),编译成exe文件,用vc6.0,怎么做呀 硬盘喀-啦,喀-啦连续的响是何原因 你们好,能告诉多表更新的时候UPDATE(true,false)中的true,false是什么意思吗? (菜菜鸟级问题)怎么给别人分数?自己的分数又是怎样积累的? 算法问题求解 怎样去看继承下来的方法的代码? 原来大把花钱的感觉真是爽!还是没有任何理由,第7个进来者300分! 我买了一张D片winnt4.0.6, 不知怎么安装。我用winnt /ox作了三张启动盘,但到最后要求我插入光盘,可是回车后最反映,能不能不用启动盘,首先说明这张D版盘可用。请大家快帮帮我@_@ 如何把我的照片拿下来? 请问在哪里可以下载ActiveReports控件的正式版,最好是中文版的。我下载成功了以后一定给分。一定多给!!! 何必呢!何苦呢!我就一天没来,发生了这么多事,虽然我还没有确切知道是怎么回事,但是大家都是朋友。怕的就是……唉!一声叹息! 谁知道哪里有JAVA编程思想的PDF格式电子书下载? 将位图保存为文件 大侠们,快说呀!! 终于大学毕业了,前途茫茫,哎~~~~~~~~ 鸡兔共40只,兔子比鸡多16条腿,问鸡兔各多少只有x的方程 用方程解(1)某校参加语文竞赛的人数是参加数学竞赛人数的八分之七,语文竞赛获奖人数是获奖总人数的五分之二,而两项竞赛没有获奖的人数各是640人,那么参加这两项竞赛的总人数是多少 小学六年级的数学题第一单元圆的认识一练习题? 一只鸡有2条腿,兔子有4条腿,现在又鸡兔若干只,他们共有240条腿,鸡是兔子的2呗,求鸡兔各有多少只?第一个回答的给悬殊按 1.艳艳有2元和5元的人民币共2张,刚好是64元,艳艳有2元和5元的人民币各多少张?2.现有只数相同的鸡、兔共居一笼,已知兔腿比鸡腿多22条,笼子中鸡、兔一共有多少只?不好意思 艳艳有2元和5元的 六年级上册数学题有关圆的问题 鸡兔同笼,共有30个头和84条腿,求鸡和兔各几只? 有两架书共360本,如果从第一架取出1/4放入第二架,则第二架比第一架多2/9,求两架书原来各有多少本? 我希望给我一套综合的五上数学【练习卷】,不用单元的卷子,弄几份份综合练习题,希望能多给我几套卷子, 鸡兔同笼,有25个头,有70条腿, 请问有几只兔子几只鸡?急用! 两只乌龟母子对话,妈妈说:“我像你现在这么大时,你才一岁”,孩子说:“妈妈,我到你现在这么大时,你就34岁了“.请列方程求解,小乌龟和妈妈现在各多少岁. 如果下图中每个小正方形的面积都是4平方厘米,图中阴影部分是?面积 鸡兔同笼,共有35个头,94条腿.求鸡和兔子各有多少只. 两遍都有x的方程怎么解, 求五年级上册数学练习题 1.鸡兔同笼,共有8个头,20条腿,笼里有几只鸡?几只兔?(用方程和列举法.) 鸡兔同笼类似的问题,但要方程解.蜘蛛有8条腿,蜻蜓有6条腿和2对翅膀.蝉有6条腿和1对翅膀.现在这三种小虫共18只,有118条腿和20对翅膀,每种小虫各几只? 五年级上册数学73页的思考题 鸡兔同笼,共有10个头,32条腿,鸡,兔各有几只?列表格 关于鸡兔同笼的题和答案方程必须是方程@# 五年级上册数学书练习五年级上册数学书练习二十七第三题 答案 鸡兔同笼,共有32个头,74条腿,鸡有()兔有()只 鸡兔同笼类型题方程解法农用车展销大厅里有三轮车、四轮车共38辆,他们的车轮总数是134个.两种车各有多少辆?不会啊,用方程,说明白,有解设. 数学五年级上册同步练习第三页第五题一个长方形,长:16厘米宽:宽是长的十分之七求长方形的面积. 鸡兔同笼,共10个头,26条腿,请问有几只鸡?几只兔?急 谁能帮我找到30道小学五年级上册的应用题,解方程和求面积(长方形,正方形,平行四边形)的题(要带答案30道小学五年级上册的应用题,解方程和求面积(长方形,正方形,平行四边形)的题( 甲每分钟走50米,乙每分钟走60米,丙每分钟走70米,甲乙两人从A地,丙从B地同时出发相向而行,丙先遇到乙,经过2分钟后再遇到甲.A、B两地相距多少米?还有两题,请各位帮个忙,1.A、B两地相距21千米 鸡兔同笼,共有10个头,32条腿,鸡、兔各有多少只?列表法 谁有相遇问题的应用题 一个两位数,其个位数与十位数之和为13,如果把个位数与十位数对调,新数比原来的数小9,求原来的两位数. 数学的鸡兔同笼怎么用方程计算?在没有“鸡比兔多……只”、“兔比鸡多……只”的情况下,该怎么用方程计算?例如:有鸡和兔共100只,共有280条腿,鸡有几只?这题就没有上面说的情况,怎么用 求解一道应用题.一个平行四边形和一个梯形的面积相等.平行四边形的底和高分别是12厘米和8厘米,梯形的中一个平行四边形和一个梯形的面积相等.平行四边形的底和高分别是12厘米和8厘米, 六(2)班有学生76人,其中13名女生与男生的一半参加数学竞赛,剩下的男生女生人数相等,这个班的男生比女生多多少人? 鸡兔同笼【用方程计算】现有数量相同的鸡兔同笼,已知兔脚比鸡脚多28只.问:笼子中的鸡和兔子各有多少只?还要等量关系式。 我找不到题了 大宝、二宝、小宝三兄的年龄之和是45岁,大宝的年龄是二宝的3倍,小宝的年龄是二宝的0.5倍,大宝、二宝、小宝各有多少岁? 鸡兔同笼问题方程计算怎么解决看来我要动真格儿的了给你们一个算式,打问号部分是“为什么这样做”如:4x+2(8-x)=262x+16 =26x =5还有,回答要简略 数学三练五年级上册计算平行四边形面积的应用题(有图) 五年级第二学期数学列方程解应用题两列火车同时从相距路程为624.5千米的两个车站相对开出,经过5小时在途中相遇,已知客车平均每小时行70千米,货车平均每小时行多少千米? 鸡兔同笼问题,如果只告诉你脚数差,应该怎么算?(方程) 兔子的脚比鸡的脚多28只.笼子中的鸡和兔子各有多少只? 五年级第二学期数学列方程解应用题和解方程解方程:1、3.6x-x-0.1x=0.752、(x-8.2+10.8)/2=1.8列方程解应用题:1、地球表面的海洋面积大约是陆地面积的2.4倍,比陆地面积多2.1亿平方千米,海洋面 北师大版六年级上册数学书,28页,三题,解方程, 小学数学北师大版五年级上册“尝试与猜测”鸡兔同笼的相关内容随便给点相关资料就可以了. 甲、乙两地相距420千米,货车和客车同时从两地相向而行,货车每小时行50千米,客车行完全程要6小时,两车几小时后相遇?(列方程解应用题) 是北京师范大学出版社的!数学书上册的,242页的12.13.14.15.16题(全用方程没有书的,12.有一块棱长为0.6米的正方体钢坯,想将它锻成横截面是0.008米的立方的长方形钢材,锻成的钢材有多高?13.某公 五年级上册数学金牌学案(鸡兔同笼)全部谁会? 1.启明小学有教师180人,其中女教师的人数是男教师的2倍,启明小学有男女教师各多少名呢?设:男教师有x人,女教师有2x人.2.解方程:3x(x-7)=0.63.同乐学校买了三件商品,粉笔90盒,单价是1.50.墨 鸡兔同笼, 黄冈小状元五年级数学上册第18页第4题答案 四分之十一减2x=四分之三 七分之二+x=三分之一工程队修4千米的公路,12天修完,平均每天修多少千米?平均每天修这条公路的几分之几?一根竹竿长5米,把它插入池塘中,露出水面的部分是三分之 最简单的方程怎么算 小学数学题题目 五年级上册数学黄冈小状元54页3题答案一块梯形地,上底长40米,下地长60米,高是40米,李伯伯在这块地中最大的一块正方形地里种棉花,其余的种花生,种花生的面积有多大? 100 甲乙两箱粉笔的盒数之比是5:1,如果从甲箱里取出12盒放入乙箱后,甲、乙两箱粉笔的数量比是7:5,那么两箱粉笔共有多少盒?不要方程! 黄冈小状元六年级上册数学p63,5,6,7 (1)用一块87.5平方米的布做桌布40块后,还剩17.5平方米,平均每块桌布用布多少平方米? 1一项工程,由甲乙两人共同做12天可以完成.甲先做2天后调整其他工作,由乙接着做3天,这时,做了的占未做的4分之1.这项工程由乙单独做,要多少天完成?2.有甲乙两袋大米,甲袋123KG,乙袋45KG.为了 六年级数学上册黄冈小状元45页答案. 甲乙两个超市共卖蔬菜1200千克,已知甲超市卖的3/5与乙超市卖的2/5同样多.甲乙两个超市各卖蔬菜多少千克?(请根据标准的格式列方程)
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn