Probleme syntaxe vb

Bonjour, il y'a un probleme de syntaxe au niveau de la ligne m$=input je sais pas c koi :(





Private Sub Text5_Change()
Dim nom, prenom As String
Dim dt As Date
Dim age As Integer
Dim jour As String
Dim t1(7) As String
nom = Text4.Text
prenom = Text5.Text
t1(1) = "lundi"
t1(2) = "mardi"
t1(3) = "mercredi"
t1(4) = "jeudi"
t1(5) = "vendredi"
t1(6) = "samedi"
t1(7) = "dimanche"
If (Text5.Text <> "") And Len(Text2.Text) >= 3 Then
------>> m$=(input("entrer votre date","","../../...."))
If Not IsDate(m$) Then
a% = MsgBox("erreur", vbRetryCancel, "erreur")
If a% = 4 Then
Text5.SetFocus
Else
Unload Form5
End If
End If
dt = CDate(m$)
age = Year(Now) - Year(dt)
jour = t1(Weekday(dt))
MsgBox ("votre age est & age& vtre jour est &jour")
End Sub