<dfn id="w48us"></dfn><ul id="w48us"></ul>
  • <ul id="w48us"></ul>
  • <del id="w48us"></del>
    <ul id="w48us"></ul>
  • 土木工程畢業論文-Excel在水文要素計算中的應用

    時間:2024-08-15 13:07:55 土木工程畢業論文 我要投稿
    • 相關推薦

    土木工程畢業論文-Excel在水文要素計算中的應用

    摘要:Excel是辦公自動化軟件Office的重要組成部分之一,是Windows操作平臺上的表格軟件,具有強大的制作表格、處理數據、數據、創建圖表等功能,在日常生活工作中得到了大量的。陜西水文工作正向自動測報邁進,但仍有不少水文測驗項目是人工測量,。利用Excel來進行一些水文要素的計算,不但適應了現階段工作要求,還提高了工作效果。 

    關鍵詞:Excel 流量 泥沙 計算 
    電子表格Excel有很多版本,現在以使用最廣的Excel 2000在北洛河?頭水文站的使用,來談談它在水文要素計算中的應用。?
    1. Excel2000的運行 ?
    軟件運行環境:Windows 98、Windows Me、Windows 2000、Windows XP。硬件環境:一般現在的計算機都能滿足,只要能安裝Windows 98即可,沒有特別要求。除安裝Excel 2000外,還應安裝Visual Basic6.0。這樣就可以創建自定義函數解決數據處理上的一些。
    2. 問題處理 
      以前西安水文局就有人將Excel制作的電子表格用于水流沙計算。目前為提高資料精度《水文資料整編規范》SL247-1999中規定水文數據采用“四舍六入,逢五奇進偶舍”的處理,同時還限制了相應的有效數字位數。這對于用電子表格計算水文資料提出了高的要求,最好的解決辦法是利用Visual Basic編寫的自定義函數和Excel內置函數來解決數據處理問題。其中對“四舍六入”的處理自定義函數為:
    Function jinghe(num As Double, DIG As Byte, Optional TorV As Boolean) As Variant
    Dim Temp1 As Double
    Dim TFM As String
    Dim Temp2 As String
    Dim Tempoff As Double
    If num = 0 n
    Temp1 = 0
    Temp2 = "0"
    GoTo ExitFn
    End If
    With Application.WorksheetFunction
    If num < 0.1 Then
    DIG = DIG - 1
    End If
    Tempoff = Abs((--Right(num / 10 ^ (Int(.Log(Abs(num))) - DIG + 1), 2) = 0.5) _
    * ((--Right(Int(Abs(num) / 10 ^ (Int(.Log(Abs(num))) - DIG + 1)), 1) _
    Mod 2) = 0)) * 10 ^ Int(.Log(Abs(num)) - DIG + 1)
    Temp1 = .Round(Abs(num), -(Int(.Log(Abs(num))) - DIG + 1))
    Temp1 = Temp1 - Tempoff
    Trn = Trn And (10 ^ Int(.Log(Temp1)) = Temp1 And Temp1 > Abs(num))
    If DIG > 14 And Trn Then
    Temp2 = "有效位數不能太多"
    GoTo ExitFn
    End If
    If DIG = 1 And Int(.Log(Abs(Temp1))) = 0 And Not Trn Then
    TFM = ""
    Else
    If Not (DIG = 1 And Int(Temp1) = Temp1 And Not Trn) Then TFM = TFM & "."
    TFM = TFM & .Rept("0", DIG + Abs(Trn) - 1)
    End If
    TFM = "0" & TFM
    If Int(.Log(Temp1)) < 0 Then
    TFM = TFM & .Rept("0", -Int(.Log(Temp1)))
    ElseIf Int(.Log(Temp1)) > 0 Then
    TFM = TFM & "E+###"
    End If
    Temp1 = Temp1 * Sgn(num)
    Temp2 = .Text(Temp1, TFM)
    End With
    ExitFn:
    If TorV Then
    jinghe = Temp2
    Else
    jinghe = Temp1
    End If
    End Function
    自定義函數形式為:jinghe(數值,保留有效位數,返回文本或數值),其中根據?頭站特點對數值小于1時的情況已作了設定,在流量、泥沙數據計算過程中應用良好。
    3. 流量、輸沙率?
    用 Excel創建流量計算表(詳見附表一“?頭(四)站測深、測速記載及流量計算表”),其中在宏中加入以上自定義函數,在計算中符合四舍六入的要求,表下方的統計欄極值挑選采用max函數在測得水深、測點流速中自動挑選。一般一個站的測流垂線基本固定,這樣再次使用只需把起點距、測得水深、信號個數、歷時輸入表格中相應空格,流量就會頃刻算出,完全符合規范要求。輸沙率計算(見附表二)比流量計算簡單,基本同流量計算。
    4. 關系曲線檢驗及標準差計算 
    按照《水文資料整編規范》SL247-1999規定水位流量、單斷沙關系曲線,關系點在10各以上就必須進行三種檢驗和標準差計算。利用Excel表格制作計算表(見附表三、四:?頭(四)站2005年單斷沙關系曲線檢驗及標準差計算表,水位流量與此相同在此不再贅述),其中點據數n統計采用COUNT(B5:B34),正負號統計采用COUNTIF(G5:G34,"+"),計算過程采用了四舍六入自定義函數。再次使用時只要輸入斷沙實測和查線點據,第二張的標準差、不確定度計算立馬產生。
    5. 結 語 
    在?頭站Excel還用于斷面圖繪制,報汛曲線繪制等方面。另外網上可以看到不少編制好的流量、標準差計算程序。但是我們的測站計算機剛開始普及,符合陜西水文計算要求,職工容易掌握,與手工計算表格、方法、流程相適應的卻很少。以上利用Excel表格計算的方法,由于直觀符合手算要求,提高了工作效率,經在狀頭站試用大家普遍能接受。同時體會到一般職工,大可不必對計算機畏懼,即使不懂,只要認真,勤于動腦,同樣能用一些軟件來解決工作中的實際,這樣才能從真正意義上使計算機在我們測報工作得到普遍應用。以上見解由于時間倉促、水平有限肯定有很多不足敬請指正。

    【土木工程畢業論文-Excel在水文要素計算中的應用】相關文章:

    淺析Excel函數在飛機大修工時收益計算中的應用03-11

    Excel在教學與管理中的應用03-21

    論Excel在日常工作中的應用03-27

    淺析Excel數據分析在醫學統計中的應用03-18

    Excel Web組件的應用(一)03-07

    土木工程畢業論文-應用“零缺陷”管理03-05

    風水文化在園林中的應用11-22

    畢業論文寫作六要素12-23

    論鋼結構在土木工程中的應用11-19

    主站蜘蛛池模板: 无码日韩精品一区二区免费暖暖| 国产精品一区二区av| 亚洲精品国产首次亮相| 精品久久一区二区三区| 中文字幕一区二区三区日韩精品| 91av国产精品| 国产精品亚洲一区二区三区在线 | 亚洲日韩精品一区二区三区无码| 国产精品1区2区| 久久国产精品免费| 亚洲精品黄色视频在线观看免费资源| 久久福利青草精品资源站| 亚洲国产精品一区第二页| 国产亚洲精品无码拍拍拍色欲 | 日韩精品乱码AV一区二区| 国产欧美日本精品| 欧美精品亚洲精品日韩专区va| 久久国产免费观看精品3| 亚洲精品黄色视频在线观看免费资源| 国产啪亚洲国产精品无码 | 精品国产一级在线观看 | 亚洲精品成人片在线观看精品字幕| 国产精品狼人久久久久影院 | 3D动漫精品啪啪一区二区下载| 亚洲一日韩欧美中文字幕欧美日韩在线精品一区二 | 久久亚洲中文字幕精品一区四| 亚洲国语精品自产拍在线观看| 国产三级久久久精品麻豆三级| 中文字幕日韩精品无码内射| 免费精品精品国产欧美在线欧美高清免费一级在线 | 成人精品一区二区三区| 国产国产成人精品久久| 成人国内精品久久久久一区| 亚洲AV无码国产精品麻豆天美 | 久久丫精品国产亚洲av| 亚洲色精品vr一区二区三区| 日韩精品人成在线播放| 久久久精品人妻无码专区不卡| 国产精品原创巨作?v网站| 丁香色婷婷国产精品视频| 性色精品视频网站在线观看 |