王付陽
(安陽正一中學(xué),河南安陽455000)
氣象資料管理是一項瑣碎、復(fù)雜又十分細致的工作,不允許發(fā)生差錯。最初的資料統(tǒng)計和發(fā)放都是采用從現(xiàn)有專業(yè)氣象管理系統(tǒng)中導(dǎo)出文本文件,然后再進行處理,工作量大的時候,出現(xiàn)錯誤的概率也隨之升高。一方面需要花費大量的計算時間,另一方面由于計算的疏忽,容易出現(xiàn)數(shù)據(jù)錯誤。由于氣象資料的需求方,一般對數(shù)據(jù)的獲取有較高的時間要求,必須嚴格按照用戶提出的時限完成數(shù)據(jù)整理工作。正是氣象資料管理與使用過程中的這種規(guī)律性、復(fù)雜性、時間性,迫使氣象資料管理計算機化成為必然。氣象資料管理就是使用計算機代替大量的人工統(tǒng)計整理,完成眾多企事業(yè)單位或個人對氣象數(shù)據(jù)的獲取要求,同時使用電腦還可以安全地、完整地保存大量的氣象資料使用記錄,為提高社會效能提供幫助。
主窗體設(shè)計的界面首先通過設(shè)計向?qū)?,設(shè)計出符合Windows使用習(xí)慣,類似于資源管理器的主窗體,然后通過Toolbar 和ImageList 控件設(shè)計出系統(tǒng)菜單,進行編輯添加系統(tǒng)需要的菜單選項。采用的主窗體主要由系統(tǒng)設(shè)置、調(diào)取資料、高級檢索、導(dǎo)入Excel 和退出五個模塊組成,如圖1 所示。在各模塊中有相應(yīng)的窗體以滿足系統(tǒng)的需求。
采用系統(tǒng)API 函數(shù)GetPrivateProfileString 和WritePrivateProfileString 來讀寫ini 文件,在ini 文件中保存文件路徑,以供下次使用。在設(shè)置界面實現(xiàn)是采用VB 中的CommonDialog 控件來進行路徑的選擇。實現(xiàn)效果如圖2所示:
實現(xiàn)專業(yè)氣象管理系統(tǒng)中導(dǎo)出的資料文件(A文件、Y文件)的導(dǎo)入,并提供必要的文件格式審查和導(dǎo)入過程中的信息反饋功能。實現(xiàn)效果如圖3所示:
實現(xiàn)多條件設(shè)置下的信息檢索功能。實現(xiàn)效果如圖4所示:
在主界面使用檢索功能查詢出數(shù)據(jù)后,點擊“導(dǎo)入Excel”,則將數(shù)據(jù)導(dǎo)出到“導(dǎo)出文件路徑的設(shè)置”的目錄中保存為檢索條件命名的Excel 文件,如:20151010143110逐月氣象資料.xls。
該系統(tǒng)通過VB 控件完成了五個模塊的設(shè)計,實現(xiàn)了管理氣象資料庫的基本功能。系統(tǒng)簡單明了、構(gòu)思精巧、功能實用,最后形成按年月記錄的Excel文件供不同用戶查詢使用。
[1]王濤.Visual Basic 程序設(shè)計[M].北京:中國水利水電出版社,2012.
[2]明日科技.Visual Basic 開發(fā)技術(shù)大全[M].北京:人民郵電出版社,2007.