Controls("Etiket" & X).Caption = DateAdd("m", X, VADEBASLANGIC)

kodu ile, vadebaslangic alanındaki veriye göre ay ekleniyor. kodda x = 1 iken Etiket1'e 1 ay, x = 2 iken Etiket2'ye 2 ay eklemiş oluyor.

Sizin örneğinizde 30 gün veya 45 gün olayı Vade Aralığı metin kutusuna yazılacak değerde alınacak ise kodun

Controls("Etiket" & X).Caption = DateAdd("d", (X * Me.VADEARALIGI), VADEBASLANGIC)

şeklinde değiştirilmesi gerekli.