Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/09/2011, 15:04
davchi
 
Fecha de Ingreso: septiembre-2009
Mensajes: 108
Antigüedad: 14 años, 7 meses
Puntos: 1
Mostrar CheckBox dependiendo de otros datos

Hola a todos

tengo un ListView y quisiera poder mostrar un checkbox dependiendo de un campo

mi codigo
Código:
Dim Item As ListItem

Private Sub Form_Load()
    Call IniciarConexion
    rs.Open "select * from contratos", cnn, adOpenStatic, adLockOptimistic
    Call CargarListView_Prestaciones(LV_Prestaciones, rs)
End Sub

Public Sub CargarListView_Prestaciones(LV_Prestaciones As ListView, rs As ADODB.Recordset)
    On Error GoTo ErrorSub
    LV_Prestaciones.ListItems.Clear
    If rs.RecordCount > 0 Then
        While Not rs.EOF
            Set ObjItem = LV_Prestaciones.ListItems.Add(, , rs(0))
           If Abs(rs!documentacion) = 1 Then
              ObjItem.SubItems(1) = "Si"
            Else
              ObjItem.SubItems(1) = vbNullString
            End If
            ObjItem.SubItems(2) = rs!fecha_carga
          rs.MoveNext
        Wend
    End If
y tendria que verse asi


osea que se muestre el checkbox si el campo D.C esta en SI

alguna Idea