本文由 资源共享网 – D 发布，转载请注明出处，如有问题请联系我们！VisionPro视觉开发调用

Public Class Form1

    Public myJobManager As CogJobManager

    Private myJob1, myJob2, myjob3, myjob4, myjob5, myjob6, myjob7 As CogJob     'QuickBuild ————vpp有多少个myjob就有多少myjob声明

    Private myIndependentJob1, myIndependentJob2, myIndependentJob3, myIndependentJob4, myIndependentJob5, myIndependentJob6, myIndependentJob7 As CogJobIndependent

#Region "主窗体加载"

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        If UBound(Diagnostics.Process.GetProcessesByName( _

          Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0 Then

            'SaveLog("软件重复打开")

            MessageBox.Show("当前版本的应用程序不允许重复运行 ！  ", "禁止运行", MessageBoxButtons.OK, MessageBoxIcon.Error)

            Application.Exit()

        End If

        checklicense()       '"检测加密狗"

        '  myCamera_Detection() ‘加载相机

        load_Vpp()             '加载vpp

    End Sub