Day関数は、引数に日付を指定します。Day関数を実行すると、1~31の整数値を返します。
Day関数の実行結果を代入する時は、左辺をInteger型にしてください。now は現在の日付時刻を返します。
Dim hi As Integer = Day(Now)
日付のほかに、日付時刻や時刻のみを指定できます。時刻のみ指定すると、1になります。
' 日付や時刻を直接値で指定する時は # で囲む Dim hi As Integer hi = Day(#10/16/2011#) ' 16 hi = Day(Now) ' 現在の日(1~31) hi = Day(#10/16/2011 3:45:56 PM#) ' 16 hi = Day(#3:45:12 AM#) ' 1
Day関数を使ったサンプルプログラムです。
Module Module1 Sub Main() ' 変数の宣言 Dim msg As String = Nothing ' Day関数で日付を判定 Select Case Day(Now) Case 1 To 10 msg = "上旬" Case 11 To 20 msg = "中旬" Case 21 To 31 msg = "下旬" End Select ' 結果を表示 Console.WriteLine(msg) End Sub End Module
Day関数をWindows アプリケーションで使う時は、Microsoft.VisualBasic.DateAndTime.Dayと記述してください。そうしないとエラーになります。
Dim hi As Integer = Microsoft.VisualBasic.DateAndTime.Day(Now)
| ◆ VB 文法 目次へ◆ |
|---|
| 文字列を表示する |
| Dim 変数の宣言 |
| = 代入演算子 |
| キーボード入力 |
| & 文字列連結演算子 |
| 3つ以上の文字列を連結 |
| 文字列を改行する |
| + 加算演算子 |
| - 減算演算子 |
| * 乗算演算子 |
| / 除算演算子 |
| ¥ 整数除算演算子 |
| Mod 整数剰余演算子 |
| ^ べき乗(累乗)演算子 |
| += -= *= /= |
| \= ^= &= |
| ◆ VB 文法 目次へ◆ |
|---|
| Day() |
| Fix() |
| Format() 数値編 |
| Hour() |
| Int() |
| IsNumeric() |
| LTrim() |
| Minute() |
| Month() |
| RTrim() |
| Second() |
| Space() |
| Trim() |
| Year() |
| ◆ VB 文法 目次へ◆ |
|---|
| Math.Absメソッド |
| Math.Ceilingメソッド |
| Math.Floorメソッド |
| Math.Maxメソッド |
| Math.Minメソッド |
| Math.Roundメソッド |
| Math.Signメソッド |
| Math.Truncateメソッド |