Per selezionare tutti gli utenti iscritti a una newsletter popolo una stringa con un ciclo:

Dim Utenti As String

Do While objReader.Read
Utenti = objReader.Item("Email") & ", " & Utenti
Loop

e poi procedo così:

mailmsg.Bcc.Add(utenti)

il problema è che ci andrebbero i doppi apici all'inizio e alla fine dell'elenco degli utenti, ma ovviamente mailmsg.Bcc.Add("utenti") non va bene, e nemmeno mailmsg.Bcc.Add(""" & utenti & """), o &quote..

mailmsg.Bcc.Add("""" & utenti & """")

ho provato così:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim utenti As String = "a,b,c"

Response.Write("""" & utenti & """")
End Sub