Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú
Private Sub Form_Load()
Set LV1.Icons = ImageList1
LV1.ListItems.Add 1, "it1", "Primer Item del ListView", 1
End Sub
Private Sub LV1_ItemClick(ByVal Item As MSComctlLib.ListItem)
If Item.Icon = 1 Then
Item.Icon = 2
Else
Item.Icon = 1
End If
End Sub