私の質問は、月の最初と最後の日をコンボボックスに基づいたテキストボックスに入れる方法です。
たとえば、コンボボックスの値は「December-2016」、「January-2017」のようになります。「December-2016」を選択した場合、「01/12/2016」「31/12/2016」を取得します。
前もって感謝します。
これにより、両方の日付が取得されます。使用した静的な日付をコンボボックスの値に置き換えるだけです。
Dim dt As Date
If Date.TryParse("December-2016", dt) Then
Dim startDt As New Date(dt.Year, dt.Month, 1)
Dim endDt As New Date(dt.Year, dt.Month, Date.DaysInMonth(dt.Year, dt.Month))
End If
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加