Visual Basic - Ayuda con DataGrid!!!

Life is soft - evento anual de software empresarial
   
Vista:

Ayuda con DataGrid!!!

Publicado por paloma (2 intervenciones) el 11/11/2010 22:01:46
Hola gente, buenas tardes... le comento mi problema, a lo mejor alguien me puede ayudar... el tema es el siguiente....
Tengo un Datagrid cargado con x cant. de registros...yo lo que necesito es contar cuantos registros hay de cada tipo segun una columna... por ej.

la Columna1 tiene como nombre "Codigo" y tiene cargado estos codigos en el datagrid:
CODIGO
41015
41020
41022
41015
41015
41030
41022

lo que necesito es contar cuantos hay de cada uno y ponerlos en un label... por ej.

41015 - label1.caption = 3
41020 - label2.caption = 1
41022 - label3.caption = 2
41030 - label4.caption = 4

Espero que me puedan ayudar... desde ya Muchas Gracias!!!
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

RE:Ayuda con DataGrid!!!

Publicado por Pedro Luis (128 intervenciones) el 12/11/2010 08:20:46
Primero se abre la Base de Datos (Bdd)
set Bdd=Opendatabase+ camino etc
Obtenemos una Selección de registros ordenada
Set Mireg=Bdd.Openrecordset ("Select * From Tabla order By Codigo")
Dim Actual as string, N as integer
Actual=Mireg!Codigo
N=0
Do Until Mireg.Eof
Do While Mireg!Codigo=Actual
N=n+1
Mireg!Movenext
Loop
Text1="El Código " & Actual & " se repite " & N & " veces"
msgbox("")
Actual=Mireg!Codigo
N=0
Loop

Bdd.close

Mas o menos debe ser asi, puede que haya resuelto tu problema, aunque tu problema de verdad es otro.
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

RE:Ayuda con DataGrid!!!

Publicado por Miguel (17 intervenciones) el 12/11/2010 13:42:52
SELECT COUNT(*), Codigo FROM Tabla GROUP BY Codigo

Te devuelve los que hay de cada tipo.

Saludos,
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