亚洲免费av电影一区二区三区,日韩爱爱视频,51精品视频一区二区三区,91视频爱爱,日韩欧美在线播放视频,中文字幕少妇AV,亚洲电影中文字幕,久久久久亚洲av成人网址,久久综合视频网站,国产在线不卡免费播放

        ?

        VBA技術(shù)在熱軋模型數(shù)據(jù)分析中的應(yīng)用

        2022-06-17 01:49:32李孝明
        新疆鋼鐵 2022年1期
        關(guān)鍵詞:八鋼表格寬度

        王 濤, 李孝明

        (新疆八一鋼鐵股份有限公司軋鋼廠)

        前言

        八鋼熱軋生產(chǎn)過(guò)程中,軋制工藝參數(shù)計(jì)算所需的區(qū)域跟蹤、數(shù)據(jù)采集、自學(xué)習(xí)、工藝參數(shù)計(jì)算及下發(fā)均通過(guò)模型系統(tǒng)完成。模型系統(tǒng)是八鋼1750熱軋生產(chǎn)運(yùn)行的核心,模型系統(tǒng)的順行,需要工藝人員在生產(chǎn)過(guò)程、設(shè)備精度變化時(shí)及時(shí)跟蹤、分析、調(diào)優(yōu)。投產(chǎn)以來(lái),模型系統(tǒng)經(jīng)過(guò)升級(jí)擴(kuò)充,目前能夠處理125個(gè)出鋼記號(hào),每個(gè)出鋼記號(hào)下又劃分寬度層別6個(gè)、厚度層別7個(gè)、溫度層別5個(gè),累計(jì)疊加工藝參數(shù)的量超過(guò)1萬(wàn)個(gè),這些參數(shù)存儲(chǔ)在系統(tǒng)的Oracle數(shù)據(jù)庫(kù)中。Oracle數(shù)據(jù)庫(kù)操作比較專業(yè),一般現(xiàn)場(chǎng)生產(chǎn)工藝人員還不熟悉?;谏a(chǎn)工藝人員最熟悉的處理數(shù)據(jù)的工具,如Office Excel,WPS的表格工具,讓工藝人員用最熟悉的方式操作數(shù)據(jù)、處理問(wèn)題,需要在專業(yè)數(shù)據(jù)庫(kù)數(shù)據(jù)與辦公表格之間建立連接,實(shí)現(xiàn)自如操作。

        經(jīng)過(guò)分析實(shí)踐,八鋼1750熱軋廠工藝人員決定采用VBA技術(shù)解決模型數(shù)據(jù)信息化的方案。VBA(Visual Basic for Applications)是一種宏語(yǔ)言,是微軟公司開(kāi)發(fā)的在其桌面應(yīng)用程序中執(zhí)行通用的自動(dòng)化(OLE)任務(wù)的編程語(yǔ)言,主要能用來(lái)擴(kuò)展Windows的應(yīng)用程序功能。目前OFFICE Excel和WPS表格都支持VBA,可以通過(guò)ADO方式連接到Oracle并操作Oracle,結(jié)合Excel的數(shù)據(jù)處理與圖表制作,就能讓生產(chǎn)工藝人員輕松便捷的處理數(shù)據(jù)。

        1 建立工作目標(biāo)

        基于VBA技術(shù)要求,八鋼1750熱軋廠工藝人員利用模型系統(tǒng)主要考慮三個(gè)方面:(1)模型自學(xué)習(xí)系數(shù)跟蹤分析;(2)與質(zhì)量密切相關(guān)的數(shù)據(jù)跟蹤分析;(3)生產(chǎn)過(guò)程跟蹤分析。

        任何方面的工作內(nèi)容都涉及到很多數(shù)據(jù),以成品寬度為例,決定熱軋成品寬度質(zhì)量的要素包括板坯寬度、立輥各道次設(shè)定及實(shí)際測(cè)壓量、粗軋道次、模型粗軋目標(biāo)寬度、寬度自學(xué)習(xí)、精軋后機(jī)架軋制力偏差、活套設(shè)定、張力、操作工寬度干預(yù)量等,這些數(shù)據(jù)共同決定一塊帶鋼的寬度質(zhì)量,而寬度質(zhì)量在實(shí)際工作中又需要研究頭部、尾部及均值等。梳理出的熱軋工藝控制要點(diǎn)與需要?dú)w集的工藝參數(shù)如表1所示。

        表1 熱軋工藝控制要點(diǎn)與需要?dú)w集的工藝參數(shù)

        在確定了工藝控制要點(diǎn)與需要?dú)w集的工藝參數(shù)后,需要做的工作是如何按照卷號(hào)或者鋼種規(guī)格進(jìn)行數(shù)據(jù)匹配歸集,如何通過(guò)VBA技術(shù)將存儲(chǔ)在不同數(shù)據(jù)庫(kù)中的關(guān)鍵相關(guān)數(shù)據(jù)自動(dòng)采集,按鋼卷號(hào)分鋼種規(guī)格呈現(xiàn)在EXCEL表中。

        2 用VBA技術(shù)處理Oracle數(shù)據(jù)庫(kù)

        2.1 使用VBA鏈接Oracle數(shù)據(jù)庫(kù),取得數(shù)據(jù)

        使用VBA技術(shù)處理Oracle數(shù)據(jù)庫(kù)中數(shù)據(jù)的流程:

        (1)安裝Oracle客戶端軟件,連接Oracle服務(wù)器。

        (2)在EXCEL 或者WPS表格啟用VBA功能;VBA不是EXCEL或者WPS的必備功能,需要安裝時(shí)選擇安裝。

        (3)在VBA中啟動(dòng)數(shù)據(jù)庫(kù)連接支持。

        VBA功能啟用后在VBA菜單欄選擇“工具”-“引用”,在彈出的引用窗口中,找到"Microsoft ActiveX Data Objects 6.1 Library"和"Microsoft ActiveX Data Objects Recordset 2.8 Library",把前面的框勾選上,點(diǎn)擊確定即可。 (如果不是這兩個(gè)版本,則選擇一個(gè)版本號(hào)最高的勾選即可)

        圖1 EXCEL WPS表格啟用數(shù)據(jù)庫(kù)連接

        (4)連接Oracle數(shù)據(jù)庫(kù),打開(kāi)數(shù)據(jù)表,提取數(shù)據(jù)到EXCEL表格中。

        在按照上述步驟配置了環(huán)境支持后,就可以在VBA中就可以使用代碼連接Oracle了。

        ①首先需定義連接對(duì)象:

        Dim conn as ADODB.Connection

        Set conn=new ADODB.Connection

        ②連接數(shù)據(jù)庫(kù)

        strConn = "Driver={Oracle in OraClient11g_home1};Dbq=TNS服務(wù)名;Uid=數(shù)據(jù)庫(kù)登錄賬戶;Pwd=數(shù)據(jù)庫(kù)登錄密碼;"

        conn.Open strConn' 打開(kāi)數(shù)據(jù)庫(kù)

        ③提起數(shù)據(jù)到EXCEL表中。

        2.2 啟用VBA的Application.ontime函數(shù)跟蹤數(shù)據(jù)

        生產(chǎn)單位一直在生產(chǎn),為了及時(shí)跟蹤數(shù)據(jù),VBA程序需要自動(dòng)運(yùn)行,VBA中Application.ontime函數(shù)定時(shí)能夠自動(dòng)運(yùn)行。

        Sub 自動(dòng)運(yùn)行()

        MyTime = Now + TimeValue("00:00:05" )

        獲取工藝數(shù)據(jù)

        Application.OnTime MyTime, "自動(dòng)運(yùn)行"

        [a1]= Now ‘單線程運(yùn)行通過(guò)時(shí)間顯示運(yùn)行狀態(tài)

        End Sub

        2.3 使用VBA ChartObjects對(duì)象繪制圖表

        數(shù)據(jù)圖形化更能使過(guò)程一目了然,使用VBA 包含的Chartobjects可以方便的繪制圖形。通過(guò)規(guī)劃,可以通過(guò)Chartobjects設(shè)置圖表的位置,圖表類型,標(biāo)題,X軸Y軸刻度,數(shù)據(jù)源,作圖的每一個(gè)細(xì)節(jié)都在控制范圍內(nèi)。

        圖2 通過(guò)VBAChartObject用圖表跟蹤顯示工藝參數(shù)

        3 應(yīng)用數(shù)據(jù)解決問(wèn)題

        結(jié)合經(jīng)驗(yàn)邏輯,通過(guò)現(xiàn)場(chǎng)實(shí)際數(shù)據(jù)對(duì)數(shù)據(jù)進(jìn)行自動(dòng)判斷,對(duì)可能造成缺陷的過(guò)程進(jìn)行抓取,工藝人員根據(jù)提示進(jìn)行驗(yàn)證,發(fā)現(xiàn)問(wèn)題,快速解決。工藝控制過(guò)程判斷系統(tǒng)提示如表2所示。

        表2 熱軋工藝控制過(guò)程缺陷判斷邏輯表

        4 結(jié)語(yǔ)

        基于規(guī)律的認(rèn)識(shí)是解決問(wèn)題的方法之一。隨著信息技術(shù)的發(fā)展,信息化越來(lái)越多應(yīng)用到產(chǎn)品制造中,將對(duì)規(guī)律的認(rèn)識(shí)轉(zhuǎn)換成信息完成數(shù)據(jù)分析。很多編程語(yǔ)言都支持對(duì)EXCEL的二次開(kāi)發(fā),八鋼1750熱軋廠工藝人員選用EXCEL 、WPS內(nèi)嵌的VBA語(yǔ)言進(jìn)行工藝數(shù)據(jù)處理,易于學(xué)習(xí)掌握,使用便捷,提高了工作效率。

        猜你喜歡
        八鋼表格寬度
        《現(xiàn)代臨床醫(yī)學(xué)》來(lái)稿表格要求
        八鋼公司發(fā)明專利
        新疆鋼鐵(2021年1期)2021-10-14 08:45:50
        統(tǒng)計(jì)表格的要求
        統(tǒng)計(jì)表格的要求
        統(tǒng)計(jì)表格的要求
        馬屁股的寬度
        八鋼公司發(fā)明專利
        新疆鋼鐵(2016年3期)2016-02-28 19:18:50
        八鋼公司發(fā)明專利
        新疆鋼鐵(2015年2期)2015-11-07 03:27:52
        紅細(xì)胞分布寬度與血栓的關(guān)系
        孩子成長(zhǎng)中,對(duì)寬度的追求更重要
        人生十六七(2015年5期)2015-02-28 13:08:24
        加勒比婷婷色综合久久| 亚洲男人的天堂精品一区二区| 中文字幕av无码一区二区三区电影| 日本午夜伦理享色视频| 国产欧美在线观看不卡| 强行无套内谢大学生初次| 日韩AV无码一区二区三| 国产自产自现在线视频地址| 免费在线观看av不卡网站| 国产办公室沙发系列高清| 亚洲黄色免费网站| 精品一区二区亚洲一二三区| 日韩精品久久中文字幕| 国产一卡2卡3卡四卡国色天香| 亚洲欧洲日产国产AV无码| 日本加勒比一道本东京热| 国产乱码人妻一区二区三区| 天堂а√在线中文在线新版 | av在线不卡一区二区三区| 无码少妇丰满熟妇一区二区| 风间由美性色一区二区三区| 精品免费一区二区三区在| 国产av一级二级三级| 亚洲日韩激情无码一区| 国内露脸中年夫妇交换| 久久精品国产亚洲av热明星| 国产一区二区精品亚洲| 天天躁日日躁狠狠很躁 | 嫩呦国产一区二区三区av| 久久精品国产亚洲av电影网| 欧美深夜福利网站在线观看| 亚洲综合色视频在线免费观看| 精品无码久久久久久久久水蜜桃| 美丽的熟妇中文字幕| 无码专区无码专区视频网址| 在线国人免费视频播放| 在线观看热码亚洲av每日更新| 无码精品一区二区三区超碰| 亚洲美女一区二区三区三州| 国产欧美一区二区三区在线看| 日韩人妻少妇一区二区三区|