Ir al contenido principal

Entradas más populares de este blog

Notas Rápidas en Windows 7

ShortCuts Negrita = Ctrl + B Cursiva = Ctrl + I Texto subrayado = Ctrl + U Tachado = Ctrl + T Lista con viñetas = Ctrl + Mayús + L (ejecutarlo varias veces cambia el estilo) Mayor tamaño de texto = Ctrl + Mayús + , (coma) Menor tamaño de texto = Ctrl + Mayús + . (punto) Alinear texto a la derecha = Ctrl + R Alinear texto a la izquierda = Ctrl + L Cambiar a mayusculas el texto = Ctrl + Mayús + A Espacio entre parrafos = Ctrl + 1, Ctrl + 2 y Ctrl + 5 Crear nueva nota = Ctrl + N Eliminar nota seleccionada = Ctrl + D Seleccionar texto = Ctrl + A Cambiar de nota = Ctrl + Tab

Treeview Persistente

Protected Sub TreeView1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles TreeView1.Load 'Verifico si existe en Sesi¢n el estado del treeview 'Si existe deshabilito el ExpandDepth If Session("TreeViewState") IsNot Nothing Then Me.TreeView1.ExpandDepth = 0 End If 'Cuando hago el bound entre mi fuente de datos y el treeview 'verifico si existe o no el estado del treeview guardado en sesi¢n If Session("TreeViewState") Is Nothing Then ' Si no existe, grabo el estado actual de expandidos/contraidos del TreeViews Dim list As ArrayList = New ArrayList SaveTreeViewState(TreeView1.Nodes, list) Session("TeeViewState") = list Else 'Si existe, restauro el estado guardado de expandidos/contraidos del TreeViews Dim list As ArrayList = CType(Session("TreeViewState"), ArrayList) RestoreTreeViewState(TreeView1.Nodes, list) End If End Sub ...