Emailformular melder overload

Får følgende fejl: Overload resolution failed because no accessible 'Send' accepts this number of arguments

Koden se således ud:
Public sub cmdSend_Click(ByVal Sender As System.Object, ByVal e As System.EventArgs)
    'dim objSmtpMail As New SmtpMail()
    dim objMailMessage as New MailMessage()
    SmtpMail.SmtpServer = "post1.tietgen.dk"
    objMailMessage.To = "dm02118@tietgen.dk"
    SmtpMail.Send(objMailMessage.To, txtMedlemsnr.text, txtNavn.text, txtTlf.text, txtEmne.text)

    'SmtpMail= Nothing

End sub

Sub cmdNulstil_Click(sender As Object, e As EventArgs)

    txtMedlemsnr.text = ""
    txtNavn.text = ""
    txtTlf.text = ""
    txtEmne.text = ""

End sub

Hvis jeg kun har 3 tekstbokse så virker det - Kan det være fordi at metoden til at sende mail med ikke kan indeholde flere tekststrenge????