none
No funciona el TtDO.RemoveAll() del ToolTip RRS feed

  • Pregunta

  • Buenas no me funciona el TtDO.RemoveAll() del ToolTip 

    para que aparesca el tooltip

    Gracias

     Dim TtDF As New ToolTip
            Dim TtDO As New ToolTip
            If DensidadDF.BackColor = Color.LightPink Then
    
                For Con_Estilo_Min_Color = 0 To Dgv_Tabla_Estilos.Rows.Count - 1
                    If ComboBox3.Text.Contains(Dgv_Tabla_Estilos.Rows(Con_Estilo_Min_Color).Cells(0).Value) = True Then
                        TtDF.SetToolTip(DensidadDF, "El estilo establece unos limites minimos entre " & Dgv_Tabla_Estilos.Rows(Con_Estilo_Min_Color).Cells(9).Value & " y " & Dgv_Tabla_Estilos.Rows(Con_Estilo_Min_Color).Cells(10).Value)
    
                        Exit For
                    Else
    
                    End If
                Next
            Else
                TtDF.RemoveAll()
                TtDF = Nothing
            End If
            'DA LA INFORMACION SI LOS LIMITES DE DENSIDAD MINIMOS NO COINCIDEN
            'DA LA INFORMACION SI LOS LIMITES DE DENSIDAD mAXIMOS NO COINCIDEN
    
            If DensidadDO.BackColor = Color.LightPink Then
                For Con_Estilo_Max_color = 0 To Dgv_Tabla_Estilos.Rows.Count - 1
                    If ComboBox3.Text.Contains(Dgv_Tabla_Estilos.Rows(Con_Estilo_Max_color).Cells(0).Value) = True Then
                        TtDO.SetToolTip(DensidadDO, "El estilo establece unos limites maximos entre " & Dgv_Tabla_Estilos.Rows(Con_Estilo_Max_color).Cells(7).Value & " y " & Dgv_Tabla_Estilos.Rows(Con_Estilo_Max_color).Cells(8).Value)
    
                        Exit For
                    Else
    
                    End If
                Next
            Else
                TtDO.RemoveAll()
                TtDO = Nothing
    
            End If
            'DA LA INFORMACION SI LOS LIMITES DE DENSIDAD mAXIMOS NO COINCIDEN

    lunes, 23 de mayo de 2016 13:02