Im having trouble firing this code :

Private Sub mnuwordwrap_Click()

strreturnstr = WordWrap(ByVal strtext As String, ByVal intwidth as Integer) As String

End Sub

Its trying to call the function wordwrap but I get "list seperator or ) needed" and it highlights the as after strtext. Any suggestions?