楊 淼,劉 埔,黃鑫磊,張 凱
(中國(guó)礦業(yè)大學(xué)資源與地球科學(xué)學(xué)院,江蘇 徐州 221008)
河川徑流的劇烈變化,給人類帶來很多不利,如汛期大洪水容易造成災(zāi)害,而枯水期水少,不能滿足興利需要。因此,無論是為了消除或減輕洪水災(zāi)害,還是為了滿足興利需要,都要求采取措施對(duì)天然徑流進(jìn)行控制和調(diào)節(jié)。這種為了除水害,興水利,通過采取人工措施對(duì)天然徑流進(jìn)行的調(diào)節(jié),就稱為徑流調(diào)節(jié)。 而利用水庫(kù),以興利為目的進(jìn)行的徑流調(diào)節(jié)稱為水庫(kù)興利調(diào)節(jié)。借助水庫(kù)的調(diào)節(jié)作用,通過興利調(diào)節(jié),按用水要求重新分配河流天然徑流,可以協(xié)調(diào)來水與用水在時(shí)間分配和地區(qū)分布上的矛盾,以及統(tǒng)一協(xié)調(diào)各用水部門需求之間的矛盾,對(duì)個(gè)人、集體用水,工業(yè)生產(chǎn)均有著重要的意義。但是水利計(jì)算中的計(jì)算公式通常都比較復(fù)雜,在興利調(diào)節(jié)計(jì)算中,往往需要進(jìn)行大量的運(yùn)算才能得到所需的結(jié)論數(shù)據(jù),如果單純依靠書面計(jì)算,需要耗費(fèi)大量人力物力,不符合現(xiàn)代水文工作的要求。雖然使用 Excel 可以幫助我們完成一部分自動(dòng)計(jì)算工作,但 Excel 畢竟不是專業(yè)的計(jì)算軟件,當(dāng)計(jì)算量和公式復(fù)雜之后,編寫起來十分容易出錯(cuò),且各 Excel 表格之間的計(jì)算公式不具備可移植性,這就導(dǎo)致下次計(jì)算仍然會(huì)出現(xiàn)大量的重復(fù)性工作。
鑒于上述情況,以 Microsoft Visual Basic 6.0 為平臺(tái),結(jié)合 Excel 的報(bào)表功能,通過 VB 與 Excel 相互間數(shù)據(jù)的交互,將 VB 與 Office 結(jié)合。用戶只需按照規(guī)定格式輸入數(shù)據(jù),興利調(diào)節(jié)計(jì)算輸入格式如圖 1 所示,陰影部分為實(shí)測(cè)資料或歷史數(shù)據(jù),空白處即為所需的結(jié)果,利用已經(jīng)寫好的 VB 程序載入數(shù)據(jù)計(jì)算,并將計(jì)算結(jié)果輸出到計(jì)算機(jī)的任意位置。……