iyi günler

Dim i As Integer

Dim d As Double

    

For i = 0 To 100

   d = i * 0.75

   If (d Mod X) Then MsgBox "tamsayı"

Next

 bu kodda d tam sayı olduğunda mesaj vermesi için "X" yerine ne yazmalıyım