Visual Basic

saravanaks wrote:

what is the difference between shared ,public and public shared variables

saravanaks wrote:

if i declare a class as shared what is the advanvantage?

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    'Get the processes with the name 'qryspree'
    'You probably stored the process name in the listview so whatever item is selected
    'will tell you the process name to get
    Dim proc() As System.Diagnostics.Process = System.Diagnostics.Process.GetProcessesByName("qryspree")

    'Loop through processes found
    'Note: Finding a process by name returns an array so the loop just
    'ensures you kill each one with that name
    For Each instance As System.Diagnostics.Process In proc
        instance.Kill()
    Next
End Sub

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ListView1.View = View.Details
        ListView1.Columns.Add("Process", 150)
        ListView1.Columns.Add("ID", 75)
        '---Popullate listview1 with running processes
        For Each proc As System.Diagnostics.Process In System.Diagnostics.Process.GetProcesses
            'Add ProcessName with a subitem as the ID
            ListView1.Items.Add(proc.ProcessName).SubItems.Add(proc.Id)
        Next
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For Each item As ListViewItem In ListView1.SelectedItems
            MsgBox(item.SubItems(1).text)
        Next
    End Sub
End Class