VB Code:
  1. msgbox = lsv1.SelectedItem.SubItems(2)

Hows that?
b