CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 No se porque aparece este error...

(1/1)

Jesmi89:
Hola, lo que pasa es que estoy haciendo este pequeño codigo, pero no se porque al momento de ejecutarlo me aparece el siguiente error:


--- Código: Text ---Public Class Form1     Private Sub LlenarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LlenarToolStripMenuItem.Click        Dim b As Integer        Dim i As Integer        Dim c As Integer         Dim a() As Integer         b = TextBox1.Text        ReDim a(b)        For i = 1 To b            a(i) = InputBox("Ingrese Datos")             c = a(i)            TextBox2.Text = TextBox2.Text & c        Next    End SubEnd Class  

y me aparece un error que dice:

InvalidCastException was unhandled

La conversion de la cadena "" en el tipo 'integer' no es válida

Gracias. :(

Nebire:
Tienes un cacao impresionante convirtiendo cadenas a valor y valor a texto... esto en VB6 era completamente normal, pero vb2005 no le gusta...

cuando vayas a pasar el contenido de una cadena a una variable numérica acostúmbrate a usarla en la forma

numero= Cint(cadena) : numero= Cint("texto")   ' si es un valor entero lo esperado, si fuera byte Cbyte(...), etc...

y cuando vayas a convertir de número a texto usa:

cadena= Cstr(numero)

El error posiblemente te aparezca en 'TextBox2.Text = TextBox2.Text & c'  si es u7na concatenación de caracteres hazlo así:
TextBox2.Text = TextBox2.Text & Cstr(c) y ya de paso cambia también... la línea 'a(i) = InputBox("Ingrese Datos")' por: a(i) =cint( InputBox("Ingrese Datos"))

Navegación

[0] Índice de Mensajes