日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

利用Excel VBA批量计算气象数据多个台站多年来春季和冬季降水量和平均气温

發布時間:2023/12/4 编程问答 40 豆豆
生活随笔 收集整理的這篇文章主要介紹了 利用Excel VBA批量计算气象数据多个台站多年来春季和冬季降水量和平均气温 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

氣象數據是地理數據的重要組成部分,存儲量雖然不大,但是處理過程非常繁瑣,長時序數據更不用說。本文總結了一個氣象數據的基本處理方法。

如下圖所示,氣象數據的排列格式是區站號→年→月→降水量→平均氣溫,時間范圍為1983~2012年,每一年都有臺站數300多個,下面按區站號+年的格式來求降水量和平均氣溫

1、求春季降水量和氣溫

春季一般認為是當年的3,4,5月份,下面我們借助Excel VBA+ADO.NET,編寫宏代碼來實現:

Sub admin()Dim conn, xRs, SQL, xFd, yearyear = InputBox("請輸入一個數", "輸入")If year = "" ThenExit SubEnd IfIf year > 2012 Or year < 1983 ThenMsgBox "你想不想混了?", vbOKOnly, "哼"Exit SubEnd IfSet conn = CreateObject("ADODB.Connection")conn.Open "Provider=Microsoft.ACE.OLE

總結

以上是生活随笔為你收集整理的利用Excel VBA批量计算气象数据多个台站多年来春季和冬季降水量和平均气温的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。