StreamWriter

[eken]

Hola a todos:

Estoy empezando con VB y estoy siguiendo un manual en el que me indica como realizar un pequeño programa que consiste en un formulario en el que introducimos el nombre de un fichero y un pequeño texto y luego lo graba. El codigo del boton Grabar es el siguiente:

Private Sub btnGrabar_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnGrabar.Click
' declarar una variable para la escritura
' de texto en un fichero
Dim oEscritor As StreamWriter
' crear un fichero de texto vacío
' y obtener un objeto StreamWriter
' para escribir en el fichero
oEscritor = File.CreateText(Environment.CurrentDirectory & "\" &
Me.txtNombreFichero.Text & ".TXT")
' escribir en el fichero el contenido del
' control TextBox
oEscritor.Write(Me.txtTexto.Text)
' cerrar el objeto, lo que cierra también el
' fichero, y eliminar el objeto
oEscritor.Close()
oEscritor = Nothing
End Sub

Cuando pulso F5 me dice que: "El tipo StreamWriter no está definido". Alguien sabría decirme donde está el error. El código es copiado del manual y según el manual no hay ningún error.

Gracias