Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ... / 20 сообщений из 20, страница 1 из 1
30.08.2012, 16:15
    #37937421
alm2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Проект на Visual Basic 6


Если запускать из среды Visual Basic - то все работает без ошибок.

Но если построить EXE файл и запустить его - то в одном месте - ошибка - см файл

Пошаговое выполнение ничего не дает - как я указал выше - при запуске в среде VB все работает.

В чем причина ???
...
Рейтинг: 0 / 0
30.08.2012, 16:18
    #37937431
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
без исходного кода вашего проекта (хотя бы процедуры Main()) ничего нельзя сказать
...
Рейтинг: 0 / 0
30.08.2012, 16:19
    #37937434
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Можно максимально вычленить код, при котором будет наблюдаться данный глюк и выложить в виде проекта?
...
Рейтинг: 0 / 0
31.08.2012, 11:03
    #37938338
alm2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Стал упрощать, чтобы локализовать ошибку.
На форме сделал ОДНУ кнопку :


-------------------------------------------
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Private Sub Command1_Click()

MsgBox (" перед UNLOAD")

    Unload Me


MsgBox (" после UNLOAD")

End Sub


-------------------------------------------

При работе EXE файла - при нажатии на кнопку -
1) появляется сообщение " перед UNLOAD")
2) затем сообщение об ОШИБКЕ (я отправлял ранее)
3) появляется сообщение " после UNLOAD")
и програма ВИСИТ - пока не снять в диспетчере задач


Вызов формы из процедуры:
---------------------------------------------------------------------
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
Private Sub Command3_Click()

.....

        Else

     
            Load FormProba       ' загружаю форму для выбора
            FormProba.Show vbModal



Me.Label24.Caption = seek_lpu.lpuSDC_Code_tmp_
LpuSdc_code_K = seek_lpu.lpuSDC_Code_tmp_        ' КОД ЦЕНТРА
Me.Label25.Caption = seek_lpu.lpuSDC_Name_tmp_
Ndogovor_K = seek_lpu.Ndogovor_tmp_

.....

End Sub




---------------------------------------------------------------------
Модератор: Учимся использовать тэги оформления кода - FAQ
...
Рейтинг: 0 / 0
31.08.2012, 11:11
    #37938353
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
alm2
Код: vbnet
1.
2.
3.
4.
5.
6.
MsgBox (" перед UNLOAD")

    Unload Me


MsgBox (" после UNLOAD")

а вот не надо таких фокусов выделалывать

после Unload Me может быть только End Sub или Exit Sub, не должно быть кода формы после выгрузки формы

если очень хочется, можно так
Код: vbnet
1.
2.
3.
4.
5.
MsgBox (" перед UNLOAD")
Me.Visible = False
MsgBox (" после UNLOAD")
Unload Me
End Sub
...
Рейтинг: 0 / 0
31.08.2012, 11:25
    #37938380
alm2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
В кнопке выхода из формы:
Private Sub Command1_Click()
Unload Me
End Sub




Вызов формы:

Private Sub Command3_Click()
Dim Nresult_ As Integer

If Me.Label23.Caption <> "" Or (iniVID_ARM = cnsVidArmOKX Or iniVID_ARM = cnsVidArmPato Or iniVID_ARM = cnsVidArmProcKab) Then


If Nresult_ = vbYes Then

Seek_Lpu_Sdc_K
Me.Label24.Caption = LpuSdc_code_K
Me.Label25.Caption = LpuSdc_name_K
Text6.SetFocus
Else



Load FormProba
FormProba.Show vbModal

MsgBox ("òî÷êà 1")

End If

End If

End Sub


Ошиибка при запуске EXE остается. В чем причина ???
...
Рейтинг: 0 / 0
31.08.2012, 11:30
    #37938392
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Так, еще раз настоятельно прошу прочитать FAQ по оформлению кода.

Выложи плиз глючный проект, чтобы мне не воспроизводить заново все эти формы и метки
...
Рейтинг: 0 / 0
31.08.2012, 11:33
    #37938403
VSVLAD
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Даже лучше приложить процедуры в форме
Код: sql
1.
2.
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Private Sub Form_Unload(Cancel As Integer)
...
Рейтинг: 0 / 0
31.08.2012, 11:41
    #37938424
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
Private Sub Command1_Click()
On error resume next
	Unload Me
End Sub




Private Sub Command3_Click()
On Error Goto err_debug

Dim Nresult_ As Integer

If Me.Label23.Caption <> "" Or (iniVID_ARM = cnsVidArmOKX Or iniVID_ARM = cnsVidArmPato Or iniVID_ARM = cnsVidArmProcKab) Then


If Nresult_ = vbYes Then

Seek_Lpu_Sdc_K
Me.Label24.Caption = LpuSdc_code_K
Me.Label25.Caption = LpuSdc_name_K
Text6.SetFocus
Else



Load FormProba
FormProba.Show vbModal

MsgBox ("&#242;&#238;&#247;&#234;&#224; 1")

End If

End If
lb_out:
	exit sub
err_debug:
	Msgbox Err.Number & ": " & Err.Description, vbCritical
	resume lb_out
End Sub
...
Рейтинг: 0 / 0
31.08.2012, 11:54
    #37938446
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Shocker.Proalm2
Код: vbnet
1.
2.
3.
4.
5.
6.
MsgBox (" перед UNLOAD")

    Unload Me


MsgBox (" после UNLOAD")

а вот не надо таких фокусов выделалывать

после Unload Me может быть только End Sub или Exit Sub, не должно быть кода формы после выгрузки формы

если очень хочется, можно так
Код: vbnet
1.
2.
3.
4.
5.
MsgBox (" перед UNLOAD")
Me.Visible = False
MsgBox (" после UNLOAD")
Unload Me
End Sub

Почему это не должно быть да еще красным цветом? Вполне может. Просто этот код не должен вызывать объекты или свойства самой формы — это приведет к ее повторной загрузке. MsgBox после Unload ни на что не влияет.
...
Рейтинг: 0 / 0
31.08.2012, 12:33
    #37938571
alm2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Причина скорее всего не в коде программы - она ведь работает из среды VB !!

А построенный EXE файл - выдает ошибку при тех же исходных данных.

Причина в другом , не могу найти ...
...
Рейтинг: 0 / 0
31.08.2012, 12:35
    #37938577
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
ещё раз: сделайте в своём проекте во всех функциях обработку ошибок.
и отладьте нормально с логированием в файл, например.
...
Рейтинг: 0 / 0
31.08.2012, 12:36
    #37938581
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
alm2,

Так дай уже проект в конце концов. Быстрее самим найти, чем переписываться предположениями.
...
Рейтинг: 0 / 0
31.08.2012, 12:43
    #37938598
alm2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Shocker.Proalm2,

Так дай уже проект в конце концов. Быстрее самим найти, чем переписываться предположениями.


Проект слишком большой+ база на SQL
...
Рейтинг: 0 / 0
31.08.2012, 12:45
    #37938606
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Тогда очищай форму до тех пор пока ошибка не перестанет возникать.
...
Рейтинг: 0 / 0
31.08.2012, 12:47
    #37938612
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
alm2Проект слишком большой+ база на SQLА я и не прошу весь проект - минимизируй до минимального неработающего состояния. Я думал, ты уже сделал это, раз приводишь фрагменты кода.

с 90% вероятностью, при урезании проекта - сам найдешь ошибку.
...
Рейтинг: 0 / 0
31.08.2012, 14:43
    #37938873
alm2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Нашел причину - но не понятно почему такой эффект в EXE варианте:

если закомментировать строку

MSGBOX(" Текст ")

- то начинает работать
...
Рейтинг: 0 / 0
31.08.2012, 14:55
    #37938896
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
вывод поверх модальной формы?
...
Рейтинг: 0 / 0
31.08.2012, 14:59
    #37938905
alm2
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
В модальной форме есть кнопка

в ней вызывается функция в которой MSGBOX()

Если так нельзя - чем заменить ?



А почему работает в среде VB ?
...
Рейтинг: 0 / 0
31.08.2012, 15:22
    #37938952
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ...
Можно.
Мы переливаем из пустого в порожнее. пока не будет нерабочего фрагмента кода, мы ничего не решим.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Если запускать из среды Visual Basic - то работает без ошибок -Но если построить EXE ... / 20 сообщений из 20, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]