sending multiple emails

Hello. I have a simple form set up to send notifications via email to members on our site. It works, but it sends multiple emails to each email adress, instead of just sending one email to each person on the list. Can anyone explain what I'm doing wrong? Thanks.
 
 
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim sEmail As String
        Dim sBody As String
        Dim objEmail As New MailMessage
        sBody = txtContent.Text
        objEmail.Subject = txtSubject.Text
        Dim MySQL As String = "Select Name, email from TestMail"
        Dim MyConn As SqlConnection = New SqlConnectio ...