用VB編寫 根據使用者輸入的年月日,求出其後一天的年月日值並輸出,請問怎麼寫啊 儘量完整的程式設計

2022-06-27 10:15:24 字數 624 閱讀 2843

1樓:萍水e相逢

不難吧dim tm

tm = cdate(trim(text1.text))tm = tm + cint(val(trim(text2.text)))

text1.text = text1.text + vbcrlf + cstr(tm)

text1.text 為給定的一天,如 2009-01-01text2.text 為其後多少天,第50天tm 為第50天即2009-2-20

回答補充: 樓主 有點 意思!

前面的朋友 談到一個 函式,dateadd 很有用 的其實,你的 考慮 如 「考慮月份有28天 29天 30天的條件」是多餘的,因為 date 型資料 會 考慮 這些的! 真的是 多慮 了!

我的方法沒有問題的!

2樓:匿名使用者

dim a as date

a=text1.text

dateadd(d, 1, a)

返回的就是下一天的日期

3樓:匿名使用者

private sub command1_click()a = #4/27/2009#

print dateadd("d", 1, a)end sub

java根據輸入的日期年月日)計算輸出第二天的日期。如輸入 輸出

計算出離begindate日期datas天的日期,若datas小於0表示當前日期之前datas天,若datas大於0表當前日期之後datas天 param 要計算的天數 return 得到日期 public static date getdate date begindate,int datas c...

編寫c語言程式,輸入年月日,輸出這個日期是這一年的第幾天。(考慮閏年)

include void main break case 4 case 6 case 9 case 11 if day 0 day 30 break case 2 2月閏年可以輸入29日 else break default 如果輸入不是1 12月份,那麼月份輸入有誤 i 0 break if i ...

關於excle年月日的計算,用EXCEL表格怎麼進行年月日的加減

樓上的做法是不對的,days360函式是以每年360天每個月30天計算的,以樓上的例子,從1984 1 9至2001 3 14共17年2個月零5,總天數是360 17 30 2 5 6185天,顯然樓主所要的不是這種結果,正確的方法如下面所示 用datedif函式 datedif 1984 1 9 ...