Foro de elhacker.net

Programación => .NET (C#, VB.NET, ASP) => Mensaje iniciado por: magonza en 19 Abril 2021, 04:26 am



Título: Codigo en Visusal Basic.net
Publicado por: magonza en 19 Abril 2021, 04:26 am
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 !!!!


Título: Re: Codigo en Visusal Basic.net
Publicado por: K-YreX en 19 Abril 2021, 19:10 pm
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
  1. Customer.EXISTENCIA = Convert.ToSingle(dt.Rows(i)("EXISTENCIA").ToString(), CultureInfo.InvariantCulture)
  2. 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.


Título: Re: Codigo en Visusal Basic.net
Publicado por: magonza en 19 Abril 2021, 21:04 pm
Muchisiiimas Gracias K-YreX,

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


Saludos desde Guatemala,


Mynor Gonzalez
Aprendiz Programacion