C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

ログ内検索
  • キーワードを複数指定する場合は 半角スペース で区切ってください。
  • 検索条件は、(AND)=[A かつ B] (OR)=[A または B] となっています。
  • [返信]をクリックすると返信ページへ移動します。
キーワード/ 検索条件 /
検索範囲/ 強調表示/ ON (自動リンクOFF)
結果表示件数/ 記事No検索/ ON
大文字と小文字を区別する

No.61951 の関連記事表示

<< 0 >>
■61951  Re[1]: 今週と先週の日曜日と月曜日の日付を取得したい
□投稿者/ shu -(2011/09/13(Tue) 12:36:06)
    2011/09/13(Tue) 12:59:28 編集(投稿者)
    2011/09/13(Tue) 12:36:41 編集(投稿者)

    <pre><pre>■No61946 (赤いガチャピン さん) に返信
    > Win7でVB2010で作成しています
    >
    > 4つのボタンを作成してそれぞれをクリックしたら 先週の日曜 先週の月曜 今週の日曜 今週の月曜 の日付(例 2011/09/12)をメッセージボックスに表示させる方法をどなたかご教授していただけませんでしょうか?
    > ちなみに曜日は火曜から始まるものとして設定したいです。
    > 例 2011年9月13日に先週の日曜ボタンをクリックしたら2011/09/11 今週の月曜ボタンをクリックしたら2011/09/19
    > よろしくお願いいたします。

    Dim TodayDay = Date.Today
    Dim TodayWeek = TodayDay.DayOfWeek - DayOfWeek.Tuesday
    If TodayWeek < 0 Then
    TodayWeek += 7
    End If
    Dim CurTuesday = TodayDay.AddDays(-TodayWeek)
    Dim PrevSunday = CurTuesday.AddDays(-2)
    Dim PrevMonday = CurTuesday.AddDays(-1)
    Dim CurSunday = CurTuesday.AddDays(5)
    Dim CurMonday = CurTuesday.AddDays(6)


    こんなんでどうでしょう?

    # 余分なコードがあったので削りました。(Dim TodayDay = Date.Todayの行)
記事No.61946 のレス /過去ログ104より / 関連記事表示
削除チェック/



<< 0 >>

パスワード/

- Child Tree -