まとまりのないブログ

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

mysqlのテーブルがクラッシュした

myisamchk: warning: Size of indexfile is: 3589517312 Should be: 1024 インデックスファイルのサイズが3億5千万・・・。修復はいつ終わ …

no image

最新のraspberry piのCPU性能がintel Atomの性能を超えていた件

超小型なシングルボードPCであるraspberry piの性能について、結構前からその存在は知っていたのだけれどまだまだ普通のデスクトップPCとかで使われるIntel Atomプロセッサにはかなわない …

no image

MSI Wind Nettop CD100の詳細(組み立て編)

MSI Wind Nettop CD100という機種を通販で購入してみたので、その組み立て方法とosインストールして稼動状態をメモ。この機種はいわゆるベアボーンキットと呼ばれるPCであるため、本体以外 …

no image

いただきストリート2 ネオンサインはバラ色に

対応機種:SFC ジャンル:ボードゲーム ゲーム内容 ゲームモード こうしきゲーム おためしゲーム トーナメントゲーム 1回戦から準決勝までは2位までに入れば勝ち上がっていける。3位4位になったキャラ …

no image

メタ文字のエスケープ

sqlインジェクション対策の一つのメタ文字のエスケープ処理。ローカルで利用するwindowsアプリケーションなので、インターネット上のwebアプリのように攻撃されることはないけれど、操作している上でメ …