Type mismatch error with use of cdate

[Ark68]

Perhaps I'm using cdate incorrectly. I wish to take the text date from a userform control ("processdate") and convert it to date serial.

me.processdate.value="Tuesday, January 23, 2018"

My code:

Private Sub Label834_Click()
    Dim uid
    uid = CDate(processdate.Value)
End Sub

I am getting a 'type mismatch' error with the line in red.

Is it my textual representation of the date which is complicating things?

 

[ranman256]

because that is not a date. Its a string that looks like a date.
remove the Day of Week and it will behave like a date....

vDate= Mid(me.processdate.value, InStr(me.processdate.value, ",") + 1)

 

[Scott T]

The Tuesday is stopping the recognition of the date. Extract just the January 23, 2018 and cdate will work

Dim uid As Date
uid = CDate(Trim(Mid(processdate, InStr(processdate, ",") + 1, 9999)))

 

[Ark68]

I would never have hammered that out on my own.
Thank you both!!