VB.net での DateDiff メソッドの使用方法

DateDiff 関数 : VBScript(Microsoft) 

DateDiff は、VBScript でも利用できるポピュラーなメソッドですが、Framework では、
引数は二通り用意されており、一つは VBScript と互換のあるデータ型で、もうひとつは
Framework の型を使ったものです。

Module Module1

	Sub Main()

		' DateDiff(日付差分)は、Microsoft.VisualBasic 名前空間の
		'  DateAndTime クラス内にあるメソッドで、VBScript でも定義されている関数

		Dim strBoundary As String = Nothing

		' VBScript でも実行可能な記述方法
		strBoundary = DateDiff("s", "1970/1/1 0:00:00", DateAdd("h", -9, Now))
		Console.WriteLine(strBoundary)

		' 上記結果を Framework に合った書き方で DateDiff する為に引数を用意
		Dim myDateTimeValue As String = "1970/1/1 0:00:00"
		Dim myDateTime As DateTime = DateTime.Parse(myDateTimeValue)
		Dim today As System.DateTime = System.DateTime.Now
		Dim duration As System.TimeSpan = New System.TimeSpan(0, -9, 0, 0)
		Dim target_date As System.DateTime = today.Add(duration)

		' Framework 用の実行
		strBoundary = DateDiff(DateInterval.Second, myDateTime, target_date)
		Console.WriteLine(strBoundary)

		Console.ReadLine()

	End Sub

End Module

関連する記事

VBScript で HTTPプロトコルで PHP へファイルをアップロードする方法

VB.NET : ベーシック

VB.net : 「ファイルを開くダイアログ」のパラメータを単純なテキストファイルより取得する

VB.net での テキストファイルの読み書きを、出力時のみキャラクタセット毎に条件コンパイル指定する

VB.net : 整数 : カンマ編集/前ゼロ/前スペース/１６進数文字列変換

テキストファイルとキャラクタセットの処理

VB.net : String、Char()、Byte() の相互変換

VB.net : 文字単位の ASCII と Unicode

コマンドプロンプト : 入力したキーストロークを表示しない readkey.exe

VB.net/C# : 連続する文字の作成と良く使う文字列フォーマット

VB.net : 各種ディレクトリパスの取得 : テンポラリ/システム/特殊ディレクトリの列挙

VB.net : アプリケーションを開始した実行可能ファイルのパス

VB.net : アプリケーションディレクトリ

VB.NET : バッチファイル用ファイルの参照ダイアログ

コマンドプロンプト : クリップボードにあるファイル情報を標準出力へ

VB.NET(コマンドプロンプト) : 指定した文字列だけ色を変えて表示する

VB.NET : SHA256