Error al crear archivo

[Codymarc]

Sisi gracias, pasa que como hay clases de por medio no me parecio llenar todo de codigo, pero ahora te lo pego. Gracias por la ayuda.

Dim ClaseControles As Controles
Dim IndiceControles As Integer = 0

Dim CantidadControlesTexto As Integer = 0
Dim CantidadControlesImagen As Integer = 0

Try
Dim Formateador As BinaryFormatter = New BinaryFormatter
Dim Trama As Stream = New FileStream("C:\PGC.cody", FileMode.Open, FileAccess.Read, FileShare.Read)

ClaseControles = (Formateador.Deserialize(Trama))
Trama.Close()

CantidadControlesTexto = ClaseControles.DevuelveCantidadElementosTexto

MsgBox(CantidadControlesTexto.ToString)

Catch ex As Exception
MsgBox(ex.ToString)
End Try