Llamar la información de un TXT en VB

[RsOfT]

Hola Muchachos:

A ver si me pueden ayudar con esto.
Con la siguiente sentencia logro grabar los datos de los textbox en un archivo TXT llamado Datos.txt y separado por coma:
Open "Datos.txt" For Append As #1
Write #1, TxtNombre.Text, TxtDireccion.Text, TxtTelCasa.Text, _
TxtTelCelular.Text, TxtTelTrabajo.Text, TxtEmail.Text, _
TxtPersonalWebSite.Text
Close #1

Hasta ahi todo bien, pero cuando trato de llevar esos datos de regreso a los textbox en funcion de motrar la informacion, me da un error en read, abajo copio el código que utilizo:
Open "Datos.txt" For Input As #1
Read #1, TxtNombre.Text, TxtDireccion.Text, TxtTelCasa.Text, _
TxtTelCelular.Text, TxtTelTrabajo.Text, TxtEmail.Text, _
TxtPersonalWebSite.Text
Close #1

Todo lo que acompaña READ me lo pone en rojo.

Que funcion es que debo utilizar para llamar esos datos?

.::RsOfT::.
--El que se aferra a lo conocido, nunca conocerá lo desconocido--
--Es intentando lo imposible como se realiza lo posible--
--Es de pesimo gusto contentarse con algo mediocre cuando lo excelente esta a nuestro alcance--
--Quien nunca ha co