まとまりのないブログ

something which something is something

vb.net 交差運転日記

今月の年月の値を取得する

投稿日:

sqlのwhere句に使うための検索条件を作るときに迷ってしまったので覚え書き。まあ、出来てしまえばなんてことは無かったけれど、フォーマットとか関数とか調べても年月のみを取得するメソッドが見当たらなかったので自分で加工するしかなく、datetimeオブジェクトのtoday関数から日付を取得して、それをtostringして、余計な部分をremoveすることで年月のできあがり。下記にサンプルコード。
(昔は文字列の加工やループとかいうものがアレルギーだったけれど、今はもう何の抵抗もなくなっている自分に驚き。慣れってすごい・・・)

サンプルコード

        '今日の日付を取得
        Dim dtYearMonth As DateTime = DateTime.Today

        '取得した今日の日付を文字列型に変換
        Dim str As String = dtYearMonth.ToString

        '年月を取得するために余計な部分を削除
        str = str.Remove(7,11)

        '出来上がりヾ(´ー` )ノ
        MsgBox(str)

サンプルコード2

こういう方法もありかな・・・

        '今日の日付を取得
        Dim today_dates As Date = DateTime.Today

        '今日の日付から年の部分を取り出し。そして文字列型へ変換。
        Dim yearValue As String = today_dates.Year.ToString

        '今日の日付から月の部分を取り出し。format関数で形式を二桁に加工。
        Dim monthValue As String = String.Format("{0:00}", today_dates.Month)

        '年と月の値を合体。
        Dim yearMonthValue As String = yearValue & monthValue

        '出来上がりヾ(´ー` )ノ
        MsgBox(yearMonthValue)

-vb.net, 交差運転日記

執筆者:


comment

メールアドレスが公開されることはありません。

日本語が含まれない投稿は無視されますのでご注意ください。(スパム対策)

関連記事

no image

TEKNOS  一人用こたつを使ってみた

就寝用コタツということなのかもしれないが暖かさは人間が温まるにはやや物足りない印象。毛布とか布団をすっぽりかぶせて使うような感じになると思うのであんまり熱すぎると危険なためこの程度の暖かさで納得するし …

no image

Rakupon ラ・クーポン

http://event.rakuten.co.jp/coupon/ グルーポンの流行というものがよくわからない。楽天はずっと前から共同購入という形で割引するシステムを導入していたのに,今更のようにク …

no image

平易の読み

平易という熟語の読み方を長い間「へいえき」と勘違いしていた。正しくは「へいい」。安易や容易という漢字と同じような意味だから類推できるが,発音のしづらさからか無意識で「へいえき」だと決めつけていたのかも …

no image

PILOT DR DRAWING PEN 買ってみた。

なかなかいい。安いし。安心のパイロット印だし。試しに自画像を描いてみた。

no image

datagridの選択した行のセルの値を取得する

備忘。.netframeworks2.0のコントロールであるdatagridコントロールで、バインドされたデータ一覧から選択された行のセル値を取得する方法。datagridのSelectedRowsプ …