powered by simpleCommunicator - 2.0.38     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ListBox - проблемы
6 сообщений из 6, страница 1 из 1
ListBox - проблемы
    #32260903
Фотография Nrisimha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Dim intCommands As Integer
Dim strCMD()
Dim strForm()

Private Sub Form_Load()
List1.Clear
intCommands = 0
End Sub

Private Sub Form_Terminate()
frm__START = Nothing
End Sub

Public Sub Add_Items(strItem As String, strFromName As String)
'On Error Resume Next
ReDim Preserve strCMD(intCommands)
ReDim Preserve strForm(intCommands)
strCMD(intCommands) = strItem
strForm(intCommands) = strFromName
Me.List1.AddItem strItem, intCommands
Вот здесь созникает ошибка, когда форма загружается второй раз: Invalid procedure call or argument "5"
intCommands = intCommands + 1
End Sub

Когда нажимаю F8 то все нормально проходит, стоит поставить
OnError Resume NEXT, то вообще не грузятся данные в List1 (это стандартный LISTBOX)
Помогите, как быть?
p/s Походу какая-то несостыковка с index
...
Рейтинг: 0 / 0
ListBox - проблемы
    #32261003
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А вот так :Me.List1.AddItem strItem
...
Рейтинг: 0 / 0
ListBox - проблемы
    #32261027
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вдогонку, невнимательно посмотрел код. Здесь еще может быть вот что. Load происходит при загрузке, и если вы делаете hide а не unload то при повторной загрузке load не происходит а происходит Acticate. Так вот в него и перекиньте код из Load.
...
Рейтинг: 0 / 0
ListBox - проблемы
    #32261349
Фотография Nrisimha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Эта форма называется frm__START
Private Sub Form_Terminate()
set frm__START = Nothing
End Sub

Так все равно, ошибка таже самая :(((
Блин, работаю с более сложными гридами и контролами и все нормально!
А с простым (ListBox) не могу справиться !
...
Рейтинг: 0 / 0
ListBox - проблемы
    #32261364
Фотография Nrisimha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо!
Решил проблему поставив вместо события
Form_Terminate
Form_Unload
(потому как первое не всегда запускается)
...
Рейтинг: 0 / 0
ListBox - проблемы
    #32261384
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот что говорит MSDN
Terminate Event


Occurs when all references to an instance of a Form, MDIForm, User control, Property Page, Webclass, DHTML Page Designer, or class are removed from memory by setting all the variables that refer to the object to Nothing or when the last reference to the object falls out ofscope.

Syntax

Private Sub object_Terminate( )

The object placeholder represents anobject expression that evaluates to an object in the Applies To list.

Remarks

For all objects except classes, the Terminate event occurs after the Unload event.

The Terminate event isn't triggered if the instances of the form or class were removed from memory because the application terminated abnormally. For example, if your application invokes the End statement before removing all existing instances of the class or form from memory, the Terminate event isn't triggered for that class or form.

Так что логично. :)
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ListBox - проблемы
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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