Codigo en Visusal Basic.net

[magonza]

Estimados buen día, pido Por Favor su apoyo para solucionar un problema que tengo en el siguiente código:

ERROR: La cadena de entrada no tiene el formato correcto


CLASE:

Public Class Customer

Public Property SUBDEPTO As String
Public Property EXISTENCIA As Single

End Class


LLENA EL DATAGRIDVIEW Y LUEGO SE ENVIARA A UNA TABLA DE SQL:

Dim dt As DataTable = Tables(cboSheet.SelectedItem.ToString())
DataGridView1.DataSource = dt
If dt IsNot Nothing Then
Dim list As List(Of Customer= New List(Of Customer()
For i As Integer = 0 To dt.Rows.Count - 1
Dim Customer As Customer = New Customer()
Customer.SUBDEPTO = dt.Rows(i)("SUBDEPTO").ToString()
Customer.EXISTENCIA = Convert.ToSingle(dt.Rows(i)("EXISTENCIA").ToString()) 'acá genera error
list.Add(Customer)
Next
CustomerBindingSource.DataSource = list
End If


GRACIAS A TODOS !!!!

[K-YreX]

Diría que el error está en el separador decimal que estás utilizando.
Si estás usando un punto (.) como separador decimal y deberías utilizar una coma (,), cualquiera de estas dos opciones te servirán:

Código (vbnet) [Seleccionar] Expandir


Customer.EXISTENCIA = Convert.ToSingle(dt.Rows(i)("EXISTENCIA").ToString(), CultureInfo.InvariantCulture)
Customer.EXISTENCIA = Convert.ToSingle(dt.Rows(i)("EXISTENCIA").ToString().Replace(".", ","))
Si el problema es a la inversa y estás utilizando la coma (,) como separador decimal cuando deberías utilizar el punto (.), debes hacer el reemplazo al contrario.

[magonza]

Muchisiiimas Gracias K-YreX,

Probare el codigo al regresar a Casa. Eres lo mejor....Bendiciones.


Saludos desde Guatemala,


Mynor Gonzalez
Aprendiz Programacion