DBには日毎の電力量が格納されている。 電力量は累積された値で減ることはない。 DBにはSQL Serverを使用。 *SQLiteでも試したら出来ました。 WHMETER 日時 電力量計A 電力量計B LOG_TIME METER_A METER_B 2014-09-01 1000 6000 2014-09-02 1100 6050 2014-0…

指定した月に1か月足して1日引いて・・・と求めていたけどDaysInMonth()で取得できる。 Dim temp As DateTime = DateTime.Now() Debug.Print(DateTime.DaysInMonth(temp.Year, temp.Month)) '末日を返すサンプル Public Function LastDay(d As DateTime) As …