Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - .NET

Страница: 1 | 2 |

 

  Вопрос: Помоги с задержкой выполнения.... Добавлено: 03.06.09 13:28  

Автор вопроса:  Артем
Вообщем есть такое событие... Что нужно сделать я написал в коментах... цикл там бесконечный и при этом форма зависает... Как сделать чтобы все работало без зависания формы... Слышал что-то про DoEvents() но ничего не вышло с ним...

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'---запустить цикл

        WebBrowser1.Navigate("http://vbnet.ru")
'----- тут подождать 5 секунд
                WebBrowser1.Navigate("http://ya.ru")
'----- опять подождать 5 сеунд

'----вернуться к началу цикла---цикл бесконечный----

    End Sub

Ответить

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

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



Вопросов: 11
Ответов: 264
 Профиль | | #1 Добавлено: 03.06.09 13:55
Попробуй использовать API функцию Sleep.

Ответить

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



Вопросов: 11
Ответов: 264
 Профиль | | #2 Добавлено: 03.06.09 13:56
Лентяи используют обычный таймер)))

Ответить

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



Вопросов: 7
Ответов: 30
 Профиль | | #3 Добавлено: 03.06.09 13:59
Я sleep использывал... Я просто еще новичек в этом деле и мало что знаю... можете мне прямо в мой код дописать что нужно... Тоесть как подключить этот sleep? и как его потом использывать... Или хотябы ссылку где почитать...

Ответить

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



ICQ: 237822510 

Вопросов: 28
Ответов: 1182
 Профиль | | #4 Добавлено: 03.06.09 14:13
API-Guide. Там и примеры есть, но на VB6. Это про Sleep. A про DoEvents как вариант можно юзать так, но опять же это в VB6.
  1. Declare Function GetInputState Lib "user32" _
  2. Alias "GetInputState" () As Long
  3. 'начало цикла
  4. If GetInputState() Then DoEvents
То еще извращение. В НЕТ все должно быть проще.

Ответить

Номер ответа: 5
Автор ответа:
 Артем



Вопросов: 7
Ответов: 30
 Профиль | | #5 Добавлено: 03.06.09 14:21
Теперь пишет что - Name 'DoEvents' is not declared.

Ответить

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



Вопросов: 11
Ответов: 264
 Профиль | | #6 Добавлено: 03.06.09 14:47
  1. Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

Ответить

Номер ответа: 7
Автор ответа:
 Unknown_Master



Вопросов: 11
Ответов: 264
 Профиль | | #7 Добавлено: 03.06.09 14:49
Я думаю всё понятно.

Ответить

Номер ответа: 8
Автор ответа:
 Артем



Вопросов: 7
Ответов: 30
 Профиль | | #8 Добавлено: 03.06.09 14:57
Unknown_Master пишет:
Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

Ну вот я так и делал, в коментах вроде ошибку не выдает... Запускаю нажимаю кнопку... Потом доходит до sleep(10000) - останавлияеться и чето пишет....

Вот код полностью.
  1.  
  2. Public Class Form2
  3.     Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
  4.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  5.  
  6.         WebBrowser1.Navigate("сайт1")
  7.         Sleep(10000)
  8.         WebBrowser1.Navigate("hсайт2")
  9.  
  10.     End Sub
  11.     Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
  12.  
  13.     End Sub
  14. End Class

Ответить

Номер ответа: 9
Автор ответа:
 Артем



Вопросов: 7
Ответов: 30
 Профиль | | #9 Добавлено: 03.06.09 15:00
У меня VB 2005

Ответить

Номер ответа: 10
Автор ответа:
 Arvitaly



ICQ: 301746136 

Вопросов: 28
Ответов: 549
 Web-сайт: okazani.ru
 Профиль | | #10
Добавлено: 03.06.09 16:25
останавлияеться и чето пишет....


))) Основательно описал проблему

Ответить

Номер ответа: 11
Автор ответа:
 EROS



Вопросов: 58
Ответов: 4255
 Профиль | | #11 Добавлено: 03.06.09 16:38
))))))))))))))))))))) паццталом!!!!!!!!!!!!!!!
Пешите исчо!!!
Аффтар.. то,что тебе тут насоветовали - это бред сивой кобылы не имеющий ничего общего с технологией NET.(только AndreyMp на подсознательном уровне понял, что тут что то не то)
Я бы написал тебе решение, но боюсь ты C# не осилишь..
Поэтому,если тебе нужен квалифицированный ответ, создай топик с заголовком: "Steel Brand помоги!!!". И если ты будешь услышан, то тебе все разложат по полочкам, и, возможно даже, набросают код на VB.

Ответить

Номер ответа: 12
Автор ответа:
 Arvitaly



ICQ: 301746136 

Вопросов: 28
Ответов: 549
 Web-сайт: okazani.ru
 Профиль | | #12
Добавлено: 03.06.09 16:43
Поэтому,если тебе нужен квалифицированный ответ, создай топик с заголовком: "Steel Brand помоги!!!".

А вот и нет
Artyom помоги!!!

Ответить

Номер ответа: 13
Автор ответа:
 EROS



Вопросов: 58
Ответов: 4255
 Профиль | | #13 Добавлено: 03.06.09 16:48
блин.. я уже запутался в его реинкорнациях... (((

Ответить

Номер ответа: 14
Автор ответа:
 AndreyMp



ICQ: 237822510 

Вопросов: 28
Ответов: 1182
 Профиль | | #14 Добавлено: 03.06.09 16:59
только AndreyMp на подсознательном уровне понял, что тут что то не то
:) Я вроде сразу так и сказал, просто на НЕТ не перешел пока, а пора бы. Уже 7 лет собираюсь. :)

Ответить

Номер ответа: 15
Автор ответа:
 DesT



ICQ: 376533105 

Вопросов: 1
Ответов: 24
 Профиль | | #15 Добавлено: 03.06.09 17:18
Имхо, для данной задачи лучше использовать таймер

Ответить

Страница: 1 | 2 |

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



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