Ver Mensaje Individual
  #3 (permalink)  
Antiguo 01/12/2009, 10:26
Avatar de lokoman
lokoman
 
Fecha de Ingreso: septiembre-2009
Mensajes: 502
Antigüedad: 14 años, 8 meses
Puntos: 47
Respuesta: Formato en columnas de Listview

Hola!!
Un poco mas corto:
En la linea donde cargas los datos:

'si el dato no es de tipo Null lo agrega
If Not IsNull(Rst.Fields(Campo)) Then
if Rst.Fields(Campo).name="precio" or Rst.Fields(Campo).name="precio2" then
Item.SubItems(i) = FormatNumber(Rst.Fields(Campo).Value, 2)
else
Item.SubItems(i) = Rst.Fields(Campo)
endif
End If