美女胸被狂揉扒开吃奶的网站o_亚洲日韩av中文无码专区_东京热激情无码专区_久久HEZYO久综合亚洲色_欧美成人高清视频_国产精品乡下勾搭老头_欧美一级v片在线播放_成人午夜国产视频_男女猛烈无遮挡免费动态图_亚洲一区国产精品视频

電線電纜網(wǎng) > 線纜設(shè)計(jì)|參數(shù)計(jì)算 > 用VBA在Excel中實(shí)現(xiàn)電力電纜假設(shè)結(jié)構(gòu)尺寸電算化 (完整版)

用VBA在Excel中實(shí)現(xiàn)電力電纜假設(shè)結(jié)構(gòu)尺寸電算化 - 無(wú)圖版

mxsf1984 --- 2010-07-27 09:32:16

1

用VBA在Excel中實(shí)現(xiàn)電力電纜假設(shè)結(jié)構(gòu)尺寸電算化

摘要:本文詳細(xì)介紹了采用Excel電子表格通過(guò)VBA語(yǔ)言結(jié)合Access數(shù)據(jù)庫(kù)及GB/T12706國(guó)家標(biāo)準(zhǔn)要求,方便快捷計(jì)算電纜假設(shè)結(jié)構(gòu)尺寸,從而確定電纜護(hù)層結(jié)構(gòu)尺寸。

關(guān)鍵詞:Excel  VBA語(yǔ)言  Access數(shù)據(jù)庫(kù)   GB/T12706 假設(shè)結(jié)構(gòu)尺寸 護(hù)層結(jié)構(gòu)尺寸

Application of VBA Language to Cable Construction Calculation in Excel

Lu ZhengRong

(Far East Cable Co.,Ltd,Yixing 214257 , Jiangsu Province ,China

Abstract: The article details a method for rapidly calculating fictitious dimensions of cable construction and determine n of sheath dimensions through Excel format by combinating with Access database and GB/T12706 standard.

Key words: Excel VBA language, Access database, GB/T12706, fictitious construction dimensions, sheath construction dimensions

1 引言

電纜制造工藝設(shè)計(jì)和計(jì)算是一項(xiàng)很繁瑣的工作,特別是隨著社會(huì)現(xiàn)代化進(jìn)程加快,電纜的結(jié)構(gòu)品種也越來(lái)越多,競(jìng)爭(zhēng)也越來(lái)越激勵(lì),如何準(zhǔn)確、快速反應(yīng)是成功的主要因素。

電力電纜結(jié)構(gòu)尺寸計(jì)算過(guò)程中,護(hù)層尺寸的確定都是以GB/T12706標(biāo)準(zhǔn)附錄A確定護(hù)層尺寸的假設(shè)計(jì)算方法計(jì)算的。也就是說(shuō),在電纜結(jié)構(gòu)尺寸計(jì)算過(guò)程中,首先必須通過(guò)GB/T12706規(guī)定的計(jì)算方法確定電纜護(hù)層尺寸,然后再進(jìn)行電纜制造工藝結(jié)構(gòu)尺寸的計(jì)算。

電纜結(jié)構(gòu)工藝及材料定額報(bào)表主要以Excel電子表格形式編制,目前常用的電纜結(jié)構(gòu)計(jì)算程序主要為用VB語(yǔ)言編制的可執(zhí)行程序文件,而表格又在Excel電子表格中編制,在使用中存在切換界面、數(shù)據(jù)傳輸不便以及無(wú)法連續(xù)操作等一系列問(wèn)題。這里采用VBA語(yǔ)言在Excel應(yīng)用程序上執(zhí)行計(jì)算,這樣以上的一系列問(wèn)題將迎刃而解。同時(shí)通過(guò)VBA將Excel與Access數(shù)據(jù)庫(kù)連接在一起使用,可以方便提取工藝原始數(shù)據(jù)加以比較使用,這一點(diǎn)可以大大減少這些原始數(shù)據(jù)在技術(shù)人員腦子里的占用量,同時(shí)也大大提高了技術(shù)人員的工作效率。

本文通過(guò)GB/T12706、Excel、VBA、Access數(shù)據(jù)庫(kù)有機(jī)結(jié)合在一起,簡(jiǎn)化了電纜工藝結(jié)構(gòu)尺寸計(jì)算過(guò)程,提高了計(jì)算速度和準(zhǔn)確性。更主要的是視窗化操作方便、靈活性強(qiáng)、通用性廣。

2 假設(shè)結(jié)構(gòu)尺寸計(jì)算標(biāo)準(zhǔn)

2.1 計(jì)算標(biāo)準(zhǔn)

電力電纜假設(shè)外徑以及護(hù)層尺寸計(jì)算已經(jīng)標(biāo)準(zhǔn)化(注意是計(jì)算標(biāo)準(zhǔn)化)。國(guó)際電工委員會(huì)的IEC50602標(biāo)準(zhǔn)出臺(tái)后,各國(guó)電力電纜產(chǎn)品已大多向IEC靠攏。國(guó)際上大多數(shù)發(fā)達(dá)國(guó)家以及國(guó)際貿(mào)易都以IEC標(biāo)準(zhǔn)作為制訂電纜產(chǎn)品依據(jù)。IEC60502標(biāo)準(zhǔn)已是國(guó)際上公認(rèn)的電力電纜執(zhí)行的唯一標(biāo)準(zhǔn)。而我國(guó)電力電纜執(zhí)行的國(guó)家標(biāo)準(zhǔn)GB/T12706等同于IEC60502,所以本程序所執(zhí)行的計(jì)算標(biāo)準(zhǔn)具有廣泛的通用性。

2.2 計(jì)算結(jié)構(gòu)分析

按GB/T12706標(biāo)準(zhǔn)描述,電力電纜結(jié)構(gòu)從內(nèi)到外依次有導(dǎo)體、絕緣、成纜內(nèi)芯、內(nèi)襯層、填充、金屬屏蔽層、同心導(dǎo)體、鉛套、隔離套、鋼帶鎧裝、細(xì)鋼絲鎧裝、粗鋼絲鎧裝、外護(hù)套等13部分組成。根據(jù)電纜使用場(chǎng)合不同結(jié)構(gòu)也不同,但不外乎于這13個(gè)部分的若干部分組合而成。具體結(jié)構(gòu)組合如圖1。

圖1 電纜結(jié)構(gòu)計(jì)算框架

3 程序設(shè)計(jì)

設(shè)計(jì)程序過(guò)程中,首先根據(jù)使用需要建立主程序框架結(jié)構(gòu);其次通過(guò)框架結(jié)構(gòu)建立電纜假設(shè)結(jié)構(gòu)計(jì)算模型,然后依據(jù)這模型編寫自定義函數(shù)代碼;再次將函數(shù)與Excel電子表格、對(duì)話框窗體及基礎(chǔ)數(shù)據(jù)庫(kù)連接在一起,相互調(diào)用數(shù)據(jù)并計(jì)算;最后在Excel電子表格的菜單欄中建立調(diào)用菜單,方便使用。

3.1 軟件語(yǔ)言及軟件準(zhǔn)備

為了達(dá)到使用的方便性及簡(jiǎn)潔性的效果,這里除了最常用的Office辦公軟件外不需要其它任何專業(yè)應(yīng)用軟件,代碼編寫語(yǔ)言同樣采用Office辦公軟件自帶的Visual Basic For Applications(簡(jiǎn)稱VAB)語(yǔ)言編寫。

3.2 程序結(jié)構(gòu)框架

本程序?yàn)榱诉_(dá)到操作簡(jiǎn)易性和通用性,將Office辦公軟件中的Excel表格作為前臺(tái)界面,適合工藝技術(shù)人員的使用習(xí)慣。將VBA編制的代碼按照GB/T12706標(biāo)準(zhǔn)規(guī)定作為數(shù)據(jù)處理層面,并連接Access數(shù)據(jù)庫(kù)取出需要的數(shù)據(jù)計(jì)算。有VBA程序通過(guò)結(jié)合Excel界面、GB/T12706標(biāo)準(zhǔn)、Access數(shù)據(jù)庫(kù),最終完成電纜假設(shè)結(jié)構(gòu)的計(jì)算,得到電纜工藝計(jì)算中所需的電纜護(hù)層尺寸。程序結(jié)構(gòu)框架如圖2

操作

調(diào)用

調(diào)用

計(jì)算對(duì)話框

Access

數(shù)據(jù)庫(kù)

VBA

代碼計(jì)算

調(diào)用

圖2. 程序結(jié)構(gòu)框架

3.3 程序代碼建立

3.3.1 VBA標(biāo)準(zhǔn)模塊邏輯模型設(shè)計(jì)

圖3  VBA標(biāo)準(zhǔn)模塊邏輯模型

3.3.2 VBA標(biāo)準(zhǔn)模塊代碼設(shè)計(jì)

     VBA標(biāo)準(zhǔn)模塊代碼的功能就是通過(guò)代碼根據(jù)3.3.1條款VBA標(biāo)準(zhǔn)模塊邏輯模型來(lái)完成計(jì)算的過(guò)程。本程序是建立在Excel系統(tǒng)背景上的,而為了提高計(jì)算操作的簡(jiǎn)便性,將代碼編制成Excel系統(tǒng)可以使用的函數(shù)形式,在Excel中使用可以實(shí)現(xiàn)單元格的下拉復(fù)制粘貼功能,并且根據(jù)引用的單元格數(shù)據(jù)不同自動(dòng)計(jì)算出不同結(jié)果。函數(shù)名稱為:假設(shè)外徑計(jì)算(規(guī)格, 電壓等級(jí), 絕緣材料, 電纜結(jié)構(gòu))。

3.4 程序的視窗化

     為了提高本程序操作的簡(jiǎn)便性,讓操作視窗化,在Excel菜單欄中增加了工具條如圖4,另外,在Excel后臺(tái)設(shè)置對(duì)話框窗體,在計(jì)算過(guò)程中調(diào)用計(jì)算對(duì)話框窗體如圖5,在前臺(tái)按對(duì)話框的提示用鼠標(biāo)選擇對(duì)應(yīng)的單元格,從而記錄下需要計(jì)算的Excel單元格地址及數(shù)據(jù),將數(shù)據(jù)送到Excel后臺(tái)計(jì)算,并將計(jì)算結(jié)果輸出到指定單元格內(nèi),完成計(jì)算任務(wù)。由于本程序使用的是函數(shù)編程及單元格地址引用取數(shù),所以可是使用單元格的下拉復(fù)制粘貼功能進(jìn)行大量數(shù)據(jù)自動(dòng)化處理,加快了操作計(jì)算速度。

圖 4

圖 5

4 有關(guān)計(jì)算結(jié)果正確性的驗(yàn)證

根據(jù)GB/T12706標(biāo)準(zhǔn)要求,通過(guò)對(duì)交聯(lián)聚乙烯絕緣、聚氯乙烯絕緣,不鎧裝、鎧裝電纜分別使用本程序和手工全系列規(guī)格計(jì)算,計(jì)算出的電纜護(hù)層尺寸完全一致,符合設(shè)計(jì)要求。

5 結(jié)束語(yǔ)

    采用VBA語(yǔ)言進(jìn)行編程,可以解決繁雜的工藝設(shè)計(jì)和計(jì)算,結(jié)果準(zhǔn)確。另外該程序可以在Excel電子表格中運(yùn)行。一方面操作簡(jiǎn)單易學(xué),另一方面可以進(jìn)行大批量的數(shù)據(jù)處理,而且將來(lái)數(shù)據(jù)如需改動(dòng),一旦改動(dòng)已知數(shù)據(jù),結(jié)果立即隨之而變。故通過(guò)VBA語(yǔ)言與Excel電子表格相結(jié)合,可以將電纜工藝設(shè)計(jì)和計(jì)算實(shí)現(xiàn)電算化、標(biāo)準(zhǔn)化。

參考文獻(xiàn):

[1 ]  GB/T12706 , 額定電壓1kV到35kV擠包絕緣電力電纜及附件標(biāo)準(zhǔn),2002

[2 ]  王春江  ,   電線電纜手冊(cè)  第7篇電線電纜結(jié)構(gòu)計(jì)算,2002

[3 ]  劉子玉  ,   電力電纜結(jié)構(gòu)設(shè)計(jì)原理,西安交大出版社,1995

[4 ]  韓中洗  ,   電纜工藝原理,上海電纜研究所信息中心

[5 ]  劉春昉  ,   VB語(yǔ)言在電纜制造工藝中的應(yīng)用,《電線電纜》2002年第6期20頁(yè)

02030224 --- 2011-09-25 12:53:33

2

能把邏輯模型或者代碼給下么。。。。
wszwsz0616 --- 2013-06-22 19:58:50

3

ssbin101 --- 2013-07-15 07:32:15

4

主要還是代碼 這個(gè)強(qiáng)烈要求樓主共享下

rsj0315 --- 2014-01-20 14:35:49

5

伸手黨 呵呵
bl3725 --- 2014-04-16 22:19:31

6

怎么把人家的文章改名字了,呵呵
-- 結(jié)束 --