Problema al generar archivo plano

[emmax]

Saludos mikolbe, en principio gracias por tomarte la molestia de responder a mi problema, tu idea no me funciono ya que al tomar el dato de DGV no me lo puede convertir si no lleva el miembro VALUE en la cadena, pero ya encontre como realizar esta convercion, quebrandome la cabeza, tal vez para algunos no sea tanto problema, pero para mi en este casi si me lo causo, encontre la solucion con las siguientes lineas, dejo el pedaso de codigo para si a algunos les puede servir en el futuro tomen la idea si esta les parece la mejor, repito gracias a mikolbe por tomarse la molestia de compartir sus ideas, saludos.

strStreamW = File.OpenWrite(FilePath)
strStreamWriter = New StreamWriter(strStreamW, System.Text.Encoding.UTF8)

Dim Codigo As String
Dim Costo As Double
Dim Descripcion As String

With DataGridView1
strStreamWriter.WriteLine(Chr(13))
For i As Integer = 0 To DataGridView1.Rows.Count - 2
Codigo = Me.DataGridView1.Rows(i).Cells("Codigo").Value.ToS tring
Descripcion = Me.DataGridView1.Rows(i).Cells("Descripcion").Valu e.ToString
Costo = Convert.ToString(Me.DataGridView1.Rows(i).Cells("P recio").Value)

strStreamWriter.WriteLine(Codigo.Trim.PadLeft(10, "0") & Descripcion & String.Format("{0:c}", Costo).Replace("$", "").Replace(".", "").Trim.PadLeft(6, "0"))
next
end with
strStreamWriter.Close()