ListView双击事件
1 Private Sub lstShowRunning_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lstShowRunning.MouseDoubleClick 2 Try 3 If lstShowRunning.SelectedItems.Count > 0 Then 4 If lstShowRunning.SelectedItems(0).ToolTipText <> "" Then 5 Using frmMsg As New frmMessage(lstShowRunning.SelectedItems(0).ToolTipText) 6 frmMsg.ShowDialog() 7 End Using 8 End If 9 10 End If 11 Catch 12 Try 13 If lstShowRunning.SelectedItems.Count > 0 Then 14 MessageBox.Show(lstShowRunning.SelectedItems(0).ToolTipText) 15 End If 16 Catch 17 End Try 18 End Try 19 End Sub 20 End Class