Add POGOserver_Shown

This commit is contained in:
--=FurtiF™=-- 2016-12-08 20:26:51 +01:00
parent 5cc15aa4f1
commit 0103e5df9f

View File

@ -1,4 +1,6 @@
Public Class POGOserver
Imports System.IO
Public Class POGOserver
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim ID As Integer
Hide()
@ -30,4 +32,10 @@
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
End
End Sub
Private Sub POGOserver_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
If Directory.Exists("..\..\..\node_modules") Then
Button1.Enabled = False
End If
End Sub
End Class