このコードを使用して月を追加しました
dtExpiry = DateAdd(DateInterval.Month, intDuration, dtStartDate)
そして私もこのコードを試しました、
dtExpiry = DateAdd("m", bytDuration, dtMemStartDate)
しかし、月ではなく日を追加するたびに。日付形式は dd/mm/yyyy である必要があります。PC の日付形式を dd/mm/yyyy に変更しましたが、それでも月ではなく日が追加され続けます。
ところで、CSV 形式のデータ ファイルからこれらの値を抽出する Main 呼び出しプログラムから期間と startDate を受け取っています。