ここでは、VB.NETで現在の1カ月後・1ヵ月前の日付を取得する方法を紹介します。

VB.NETで現在の1カ月後・1ヵ月前の日付を取得するには、ADDMONTHSメソッドを使います。

＜サンプル＞

Public Class Form1
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

Dim d = DateTime.Now
Dim str = d.AddMonths(1).ToShortDateString
MsgBox(str)

End Sub
End Class

「Dim d = DateTime.Now」で現在の日付を取得しています。
さらに、「d.AddMonths(1)」で現在の日付にプラス1ヵ月した値を取得しています。一ヵ月前の値を取得したい場合は、「d.AddMonths(-1)」としてください。