Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If i Then
Close()
Else
MessageBox.Show("not found!")
End If
Close()
'Process.Start(Application.StartupPath & "\Windows Live Messenger 2011.exe")
End Sub
Dim i As Boolean
i = Shell(Application.StartupPath & "\Windows Live Messenger 2011.exe", 1)If i Then
Close()
Else
MessageBox.Show("not found!")
End If
Close()
'Process.Start(Application.StartupPath & "\Windows Live Messenger 2011.exe")
End Sub