
01/12/2009, 10:26
|
 | | | Fecha de Ingreso: septiembre-2009
Mensajes: 502
Antigüedad: 15 años, 7 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 |