Visual Basic.NET - Mostar en un datagridview los numeros del 1 al 20

 
Vista:
sin imagen de perfil

Mostar en un datagridview los numeros del 1 al 20

Publicado por acerrato2 (25 intervenciones) el 16/09/2015 08:29:22
Hola tengo una duda como muestro los números del 1 al 20 en un datagridview pero que el usuario ingresa los números de donde empieza y adonde va a terminar
pensé en un FOR pero no se como introducirlos en el datagridview

Dim Primer As Integer
Dim ULTIMO As Integer

For Primer = txtPrimerNumero.Text To ULTIMO = txtUltimoNumero.Text

'Mostar los datos en el datagridview

Next

Y también que se muestre con un formato así "00000001" y el ultimo numero sea así "000000020".
En el datagridview se tendría que mostrar así:

00000001
00000002
00000003
00000004
00000020
AYUDA POR FAVOR.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

Mostar en un datagridview los numeros del 1 al 20

Publicado por omar (155 intervenciones) el 16/09/2015 14:17:30
enviame tu email para apoyarte en eso y si usas teanviewer podre apoyarte desde tu pc
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
-1
Comentar
Imágen de perfil de giancarlo
Val: 377
Bronce
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Mostar en un datagridview los numeros del 1 al 20

Publicado por giancarlo (488 intervenciones) el 16/09/2015 18:05:39
poner los numeros en la fina, no hay problema, pero para poder ponerlo con ceros al inicio, necesitas usar padleft, que esta dentro de todo string: numero.tostring.padleft(10,"0"), donde 10 es el numero de cifras que debe tener (los que falta completara con el caracter 0

asi:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
dim inicio,fin,iFila as integer
inicio=cint(val(txtInicio.text))
fin=cint(val(txtFin.text))
iFila=0
 
'verificar el fin
if fin<inicio then
msgbox("Numero final no valido")
txtFin.selectall
txtFin.focus
exit sub
end if
 
datagridview1.rows.add(final-inicio)
for i =inicio to final
datagridview1.item(0,iFila).value=inicio.tostring.padleft(10,"0")
iFila+=1
next
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Mostar en un datagridview los numeros del 1 al 20

Publicado por acerrato2 (25 intervenciones) el 17/09/2015 01:05:35
Hola amigo muchas gracias giancarlo yo agregue el codigo que me hiciste pero a la hora de imprimir me imprime una secuencia de números pero solo el mismo numero se repite
0000001
0000001
0000001
Así se repite y yo lo que quiero que se demuestre es:
0000001 Donde este es el primer numero que ingresa el usuario
0000002
0000003
0000004
0000005 Y este es el ultimo numero que ingresa el usuario.

Tengo otra pregunta a la hora de implementar este código en el botón que me genera el código en el datagridivew me dice un error
que "no se pueden agregar filas mediante programación a la colección de filas de Datagridview cuando el control esta enlazado a datos."
Estoy trabajando con un Dataset que me guarda la informacion en un XML. Y las tablas las tengo adentro del Dataset. Ayuda porfa amigo. Una solucion que me sale es esta Get Heneral help for this exception.
Mi correo es [email protected]
Ayuda porfavor amigo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Adrian

Mostar en un datagridview los numeros del 1 al 20

Publicado por Adrian (1 intervención) el 18/09/2015 21:20:50
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
'Copialo y pégalo en tu código solo verifica que los controles se llamen igual que estos, saludos.
 
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        'Declaracion de variables
        Dim num1, num2, acumulador, fila As Integer
        Dim formato As String
 
        'Asignacion de variables
        num1 = txtInicio.Text
        num2 = txtFin.Text
        acumulador = num1
        fila = 1
 
        'borramos las columnas del datagrid y despues agregamos una sola donde se muestra el valor
        Me.DataGridView1.Columns.Clear()
        Me.DataGridView1.Columns.Add(0, "Valores")
 
 
        'Proceso
        For i = num1 To num2
 
            formato = acumulador.ToString.PadLeft(10, "0")
            Me.DataGridView1.Rows.Add(fila, num2)
            Me.DataGridView1.Item(0, fila - 1).Value = formato
            acumulador = acumulador + 1
            fila = fila + 1
 
        Next i
 
    End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar