Visual Basic - Enviar E-Mail desde VB a Varios Destinos

Estimados:

tengo el siguiente codigo para poder enviar E-Mail desde VB6 utilizando la referencia a Outlock 11, pero tengo 2 dudas.
1) como enviar a varios destinos el mismo correo, he probado colocando las direcciones de correo separadas por ; (punto y coma), pero solo lo envia a la primera de las direcciones escritas.

2) como agregar al pie la firma predeterminada de Outlock para asi poder personalizar el mensaje, o solo se puede agregar en el .body?

bueno les dejo el codigo para su ayuda.
gracias de antemano
'*********************************************
Dim objOL As Outlook.Application
Dim msg As Outlook.MailItem

Set objOL = New Outlook.Application
Set msg = objOL.CreateItem(olMailItem)

With msg
'Destinatario(s) del Correo
.To = text1.text
.Subject = "Título del email"
.Body = text1.text & vbcr & text2.text
' lo siguiente por si quieres adjuntar cualquier archivo
.Attachments.Add "c:UnArchivo1.jpg"
' Envia el correo
.Send
End With

Set objOL = Nothing
Set msg = Nothing

Hola.
No se como se hace lo que pides, pero he copiado y codigo y me viene muy bien. Solo tengo dos preguntas. ¿Como quito las preguntas que hace el programa en ejecucion? (la primera es el tiempo que lo utilizare y la segunda que puede ser un viros). Y la segunda: tengo varias cuentas de correo electronico, ¿Como indico desde que cuenta quiero enviar el correo?

Muchas gracias
Un saludo

Estimado, quizás ya resolviste el problema, de todas maneras dejo aquí la sentencia para enviar el correo a más de 1 destinatario:

Dim objOL As New Outlook.Application
Dim objMail As MailItem

Set objOL = New Outlook.Application
Set objMail = objOL.CreateItem(olMailItem)

With objMail
.To = "destinatario1;destinatario2;destinatario3;etc"
'aquí puedes poner cuantos destinatarios quieras
'puedes utilizar ".Cc" en caso de enviar con copia a más gente o bien usar el ".Cco" que son las copias ocultas
.Subject = "Adjuntar archivo"
'encabezado del correo
.Body = "Estimados, se adjunta el archivo de referencia. "
'Mensaje a enviar
.Attachments.Add ("D:\Archivo adjunto.xls")
'puedes adjuntar archivos
.Send
End With

Set objMail = Nothing
Set objOL = Nothing

donde tengo que poner el cco para ocultar los demas envios ocultos?. Gracias