国产午夜精品久久久久免费视-国产午夜三级-国产性大片黄在线观看在线放-国产性老妇女做爰在线-一区一精品-一区在线观看

Excel在水文要素計算中應用的論文

時間:2021-06-12 09:57:45 論文 我要投稿

Excel在水文要素計算中應用的論文

  Excel在水文要素計算中的應用 Excel在水文要素計算中的應用 Excel在水文要素計算中的應用

Excel在水文要素計算中應用的論文

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

  關鍵詞:Excel 流量 泥沙 計算

  電子表格Excel有很多版本,現在以使用最廣的Excel 2000在北洛河?頭水文站的使用,來談談它在水文要素計算中的應用 軟件運行環境:Windows 98、Windows Me、Windows 2000、Windows XP。硬件環境:一般現在的計算機都能滿足,只要能安裝Windows 98即可,沒有特別要求。除安裝Excel 2000外,還應安裝Visual Basic6.0。這樣就可以創建自定義函數解決數據處理上的一些問題。

  1. 問題處理

  以前西安水文局就有人將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 Then

  Temp1 = 0

  Temp2 = "0"

  GoTo ExitFn

  End If

  With Application.WorksheetFunction

  If num < 0.1 Then

  DIG = DIG - 1

  End If * ((--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時的情況已作了設定,在流量、泥沙數據計算過程中應用良好。

  2. 流量、輸沙率計算?

  用 Excel創建流量計算表(詳見附表一“?頭(四)站測深、測速記載及流量計算表”),其中在宏中加入以上自定義函數,在計算中符合四舍六入的要求,表下方的統計欄極值挑選采用max函數在測得水深、測點流速中自動挑選。一般一個站的測流垂線基本固定,這樣再次使用只需把起點距、測得水深、信號個數、歷時輸入表格中相應空格,流量就會頃刻算出,完全符合規范要求。輸沙率計算(見附表二)比流量計算簡單,方法基本同流量計算。

  3. 關系曲線檢驗及標準差計算

  4. 結 語

  在頭站Excel還用于斷面圖繪制,報汛曲線繪制等方面。另外目前網上可以看到不少編制好的流量、標準差計算程序。但是我們的測站計算機剛開始普及,符合陜西水文計算要求,職工容易掌握,與手工計算表格、方法、流程相適應的卻很少。以上利用Excel電子表格計算的方法,由于直觀符合手算要求,提高了工作效率,經在狀頭站試用大家普遍能接受。同時體會到一般職工,大可不必對計算機畏懼,即使不懂英語,只要認真學習,勤于動腦,同樣能用一些應用軟件來解決工作中的實際問題,這樣才能從真正意義上使計算機在我們測報工作得到普遍應用。

【Excel在水文要素計算中應用的論文】相關文章:

Excel在水文要素計算中的應用論文06-21

Excel程序在機械設計計算中的應用論文04-21

海洋水文測量要素研究論文04-16

項目教學在Excel數據處理中的應用實踐論文06-27

《Excel中公式與函數的應用》說課稿范文04-02

Excel在會計中的應用實驗報告10-10

水文地質調查評價在環境影響評價中的應用論文05-13

2SPSS在“再測信度”計算中的應用的論文06-15

審美要素及平面設計應用研究論文04-15

主站蜘蛛池模板: 成人网18免费软件 | 日韩a视频 | 91免费永久国产在线观看 | 久久综合偷偷噜噜噜色 | 免费的成人a视频在线观看 免费的a级毛片 | 激情一区二区三区成人 | 成人久久18免费网站游戏 | 国产制服 国产制服一区二区 | 欧美 日韩 中文字幕 | 日韩精品无码一区二区三区 | 麻豆一区区三三四区产品麻豆 | 国产精品视频ccav | 福利视频亚洲 | 久久免费视频观看 | 日本一区二区三区在线 观看网站 | 三级网站在线 | 免费观看又黄又刺激的视频网站 | 国产91网站在线观看 | 欧美精品成人久久网站 | 国产日韩精品欧美一区色 | 天天摸夜夜摸狠狠摸夜夜摸 | 高清欧美在线三级视频 | 午夜成年人视频 | 亚洲欧美人妖另类激情综合区 | 国产乱人伦精品一区二区 | 国产www在线观看 | 日韩中文视频 | 性欧美13处丶14处 | 中文字幕在线免费视频 | 欧美激情影音先锋 | 欧美在线成人免费国产 | 全免费午夜一级毛片一级毛 | 欧美性与交视频在线观看 | xxx中国毛茸茸 | 欧美整片sss | 色视频国产 | 国产国产精品人在线视 | 一级毛片人与动免费观看 | 韩日欧美 | 国产精品九九免费视频 | a黄色片|