Public Class AddMachine
    Private Sub AddMachine_2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim newID As Integer
    End Sub
End Class