HOME       LIST

【VB】1ヶ月の日数計算

1ヶ月の日数計算

親の能力を超えたと判断した場合、親の象徴的な部分(影響)を忘れて。 - 2017/03/18(DOJEUN)

material girl(お金や物を重要視する女性)


Dim dtmMonth1 As Date
Dim dtmMonth2 As Date
Dim int1 As Integer

dtmMonth1 = "2016/04/19"
dtmMonth2 = DateAdd("m", 1, dtmMonth1)
dtmMonth2 = DateAdd("d", -1, dtmMonth2)

int1 = DateDiff("d", dtmMonth1, dtmMonth2)
MsgBox dtmMonth1 & " - " & dtmMonth2 & " - " & (int1 + 1)

以前コンテンツ:【VB6】 ダイアログからファイルを選択
次のコンテンツ:【VB】For Next文内で途中で抜ける



Copyright(c) 2007-2020 dojeun.com All Rights Reserved.

Valid XHTML 1.0 Transitional