tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルToOADate/FromOADateを使い一日後の値を取得したい
記事No5117
投稿日: 2007/03/15(Thu) 10:48
投稿者かんかん
ToOADate/FromOADateを使い一日後の値を取得したい

こちらのサイトには大変お世話になっております。

現在

Dim intDay1 integer

intDay1 = 20070331

という値を持っていて
intDay1の値を日付として見て
一日後の(2007年4月1日)の値を取得し
さらに 20070401 とinteger型に変換したいのです。

ToOADate/FromOADateを使えばできそうかと思ったのですが
どうにもうまく取得できません。

system.Datetime.FromOAdate は記述できるのですが
system.Datetime.ToOAdate は波線が出てエラーになってしまいます。

原因や他取得方法ありましたらお教えください!
よろしくお願い致します。

[ツリー表示へ]
タイトルRe: ToOADate/FromOADateを使い一日後の値を取得したい
記事No5118
投稿日: 2007/03/15(Thu) 11:10
投稿者よねKEN
> ToOADate/FromOADateを使い一日後の値を取得したい

OADateを扱うメソッドはVB6.0のDate型の内部形式を扱うための
メソッドで今回の用途には使えないと思います。

> intDay1 = 20070331
>
> という値を持っていて
> intDay1の値を日付として見て
> 一日後の(2007年4月1日)の値を取得し
> さらに 20070401 とinteger型に変換したいのです。

Dim dt As Date = DateTime.ParseExact(intDay1.ToString(), "yyyyMMdd", Nothing)
dt = dt.AddDays(1)
Dim intDay2 As Integer = CInt(dt.ToString("yyyyMMdd"))

といった感じで処理できます。
各メソッドはヘルプを参照してください。

[ツリー表示へ]
タイトルRe^2: ToOADate/FromOADateを使い一日後の値を取得したい
記事No5122
投稿日: 2007/03/15(Thu) 11:40
投稿者かんかん
よねKENさま

すばやい回答ありがとうございます!!
.NET使うのがはじめてで、ネットでいろいろ検索した結果たどり着いた
ToOADate/FromOADate
に、よく理解もできていないのにこだわり過ぎてました。

お教えいただた記述で無事処理できました。
記述の仕方等も大変参考になります。

本当にありがとうございました!
今後も勉強させていただきます。

[ツリー表示へ]