Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: timer+listbox+for x Добавлено: 24.01.09 22:15  

Автор вопроса:  amentis
Private Sub Timer1_Timer()

For x = 0 To form1.list1.ListCount - 1
    If form1.list2.List(x) > 0 Then
    list1.List(x) = form1.list1.List(x)
    list2.List(x) = form1.list2.List(x)
    End If
Next x
end sub

выдает ошибку invalid property array index
в чем проблема?? причем если в листбоксе из которого он берет значения 0 только в самом последнем, он выдает ошибку только на этом самом 0 а до него все записывает

Ответить

  Ответы Всего ответов: 6  

Номер ответа: 1
Автор ответа:
 amentis



Вопросов: 6
Ответов: 31
 Профиль | | #1 Добавлено: 24.01.09 22:18
если то же самое писать в form_load то никаких ошибок нет и все считывает..но к сожалению только при загрузке формы =( а мне надо чтобы постоянная синхронизация была и убирала бы все строки со значением 0

Ответить

Номер ответа: 2
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #2
Добавлено: 25.01.09 16:32
не совсем понимаю что с чем должно синхронизоваться, но допустим у нас два листбокса List1, List2.
  1. Private Sub Timer1_Timer()
  2. Dim x as integer '>Объявляем все используемые переменные<
  3. For x = 0 To list1.ListCount - 1
  4.     list2.clear 'Очищаем лист2
  5.     'Если числовое значение list1.List(x)>0, добавляем в лист2
  6.     If val(list1.List(x)) > 0 Then _
  7.         list2.AddItem list1.List(x)
  8. Next x
  9. end sub

Ответить

Номер ответа: 3
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #3
Добавлено: 25.01.09 16:37
list2.clear конечно ПЕРЕД циклом for=)

Ответить

Номер ответа: 4
Автор ответа:
 amentis



Вопросов: 6
Ответов: 31
 Профиль | | #4 Добавлено: 25.01.09 20:19
усе, спасиб большое =) забыл очистить =) работает

Ответить

Номер ответа: 5
Автор ответа:
 VβÐ



Вопросов: 15
Ответов: 194
 Web-сайт: www.homacosoft.com
 Профиль | | #5
Добавлено: 27.01.09 22:02
жрать

Ответить

Номер ответа: 6
Автор ответа:
 GDK



Вопросов: 13
Ответов: 348
 Профиль | | #6 Добавлено: 28.01.09 12:53
Чё такое "жрать".

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам