Help with debugging a VBA code

[


This is where i get an error:

Private Sub CommandButton1_Click()
Dim fdate As Date
Dim sdate As Date
Dim n As Integer
fdate = DateValue(startDate)
sdate = DateValue(sendDate)
n = DateDiff("d", fdate, sdate)
MsgBox n
End Sub