Çözdüm arkadaşlar ihtiyacı olan varsa atıyım;
1 adet timer gereklidir
Kod:
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Dim p() As Process
p = Process.GetProcessesByName("discord")
If p.Count > 0 Then
Label8.Text = "Discord Bulundu! Aktif Edildi."
Button2.Enabled = True
Button3.Enabled = True
Else
Label8.Text = "Discord Bulunamadı, kullanamazsınız."
Button2.Enabled = False
Button3.Enabled = False
End If
End Sub