Как отлаживать / прерывать работу Sub Main ()? - PullRequest
0 голосов
/ 22 апреля 2020

Я отлаживаю чужое программное обеспечение, и похоже, что код в Sub Main() не срабатывает.

Как проверить, что код в main () действительно запущен?

Main ():

Sub Main()
    Dim tMon As TaskMonitoring.TaskMonitorIface = Nothing
    Dim tMonTask As TaskMonitoring.LogTask = Nothing

    Try
        If Command() = "admin" Then
            frmAdmin.ShowDialog()
            End

        End If

        ReadSettingsINI(My.Computer.FileSystem.CurrentDirectory & "\DB.INI") 'Reading the database
        Console.WriteLine("First Line Example")

        '### This gets the last time the TaskMonitorEmail ran.
        '### This is so I can check if any errors occured between the last start date and now.
        Dim TaskMonStartDateTime As String
        TaskMonStartDateTime = GetTMDateTime()



        Try
            Call CheckAndCreateTaskLoggingTables(Dif.GetDBDetails)
            '### This logs every time the software runs.
            tMon = New TaskMonitorInterface.TaskMonitoring.TaskMonitorIface(Dif.GetDBDetails) 'catching ?
            tMonTask = tMon.CreateTask(My.Application.Info.ProductName)

        Catch ex As Exception
            tMon = Nothing
            tMonTask = Nothing
        End Try
 etc...

1 Ответ

1 голос
/ 22 апреля 2020

Исходя из ваших комментариев, сначала убедитесь, что вы установили Sub Main в качестве объекта запуска. Для этого:

  1. Щелкните правой кнопкой мыши свой проект
  2. Выберите Свойства
  3. На левой панели выберите первый элемент Application
  4. Вкл. На правой панели вы видите выпадающий список с меткой Startup objects:
  5. Выбрать Sub Main

После этого будет вызван ваш Sub Main, который также должен быть отлаживаемым.

...