none
Numeración correlativa desde TextBox

    Pregunta

  • Saludos cordiales a todos, la consulta es la siguiente como poder generar valores nuemricos y agregarlos a una DataGridview por ejemplo: TextBox1=10 y TextBox2=20 y al hacer clic en el boton muestre los datos al DataGridview que vaya de 10,11,12,13 hasta el 20, agradeceria pronta respuesta, seagradece de antemano.

         Dim n1 As Long
         Dim n2 As Long
    
            For valor As Long = n1 To n2
                Me.DataGridViewX1.Rows.Add(valor)
    
            Next
    
    


    David Mayurí Rojas

    viernes, 30 de septiembre de 2016 16:02

Respuestas

  • Hola David.M.R,

    Si lo agregas de esa forma, el DataGridView tomará los valores como el número de filas a crear. Deberías usar un DataTable.

            Dim n1 As Integer = CInt(TextBox1.Text)
            Dim n2 As Integer = CInt(TextBox2.Text)
    
            Dim dt As New DataTable
            dt.Columns.Add("Conteo")
    
            For valor = n1 To n2
                dt.Rows.Add(valor)
            Next
    
            DataGridViewX1.DataSource = dt

    Solo tendrías que eliminar esa columna que has creado en tiempo de diseño, ya que el DataTable te generará la columna.

    Saludos.


    JC NaupaCrispín
    Lima - Perú

    La magia no existe, la programación SI

    • Marcado como respuesta David.M.R viernes, 30 de septiembre de 2016 16:30
    viernes, 30 de septiembre de 2016 16:21

Todas las respuestas

  • Hola David.M.R,

    Si lo agregas de esa forma, el DataGridView tomará los valores como el número de filas a crear. Deberías usar un DataTable.

            Dim n1 As Integer = CInt(TextBox1.Text)
            Dim n2 As Integer = CInt(TextBox2.Text)
    
            Dim dt As New DataTable
            dt.Columns.Add("Conteo")
    
            For valor = n1 To n2
                dt.Rows.Add(valor)
            Next
    
            DataGridViewX1.DataSource = dt

    Solo tendrías que eliminar esa columna que has creado en tiempo de diseño, ya que el DataTable te generará la columna.

    Saludos.


    JC NaupaCrispín
    Lima - Perú

    La magia no existe, la programación SI

    • Marcado como respuesta David.M.R viernes, 30 de septiembre de 2016 16:30
    viernes, 30 de septiembre de 2016 16:21
  • Muchas gracias

    David Mayurí Rojas

    viernes, 30 de septiembre de 2016 16:30
  • "David.M.R" preguntó:

    > como poder generar valores nuemricos y agregarlos a una DataGridview por ejemplo:
    > TextBox1=10 y TextBox2=20 y al hacer clic en el boton muestre los datos al
    > DataGridview que vaya de 10,11,12,13 hasta el 20,

    Hola, David:

    Tan solo tienes que ir agregando filas al control DataGridView conforme recorres un bucle entre el valor mínimo (TextBox1) y máximo (TextBox2), es decir, entre 10 y 20, si éstos son los valores escritos en los controles TextBox:

     
       Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    
            ' Valor inferior, que se supone es el que hay escrito en el control TextBox1
            Dim inferior As Integer = CInt(TextBox1.Text)
    
            ' Valor superior, que se supone es el que hay escrito en el control TextBox2
            Dim superior As Integer = CInt(TextBox2.Text)
    
            For item As Integer = inferior To superior
                ' Añadimos una nueva fila
                Dim index As Integer = DataGridView1.Rows.Add()
                ' Insertamos el valor en la primera columna de la fila añadida
                DataGridView1.Rows(index).Cells(0).Value = item
            Next
    
        End Sub
    

    Y el resultado es el que muestra la imagen:


    Un saludo


    Enrique Martínez Montejo
    [MS MVP - Visual Studio y Tecnologías de Desarrollo]

    Nota informativa: La información contenida en este mensaje, así como el código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin garantías de ninguna clase, y no otorga derecho alguno. Usted asume cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o sugerido en el presente mensaje.

    Si esta respuesta le ha resultado útil, recuerde marcarla como satisfactoria.

    Si usas Visual Basic .NET y deseas ser productivo y feliz, se inteligente y activa la instrucción
    Option Strict.

    viernes, 30 de septiembre de 2016 16:31
    Moderador