Форум программистов, компьютерный форум, киберфорум
Наши страницы

Visual Basic

Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 8, средняя оценка - 4.63
clonio
0 / 0 / 0
Регистрация: 18.08.2010
Сообщений: 83
#1

Нужны сотые доли секунды, а считает целыми - VB

09.11.2011, 05:08. Просмотров 1081. Ответов 3
Метки нет (Все метки)

Может кто подскажет, в чем ошібка? В столбік запісывается время. Нужно, чтобы это это дело работало как можно быстрее, но чтобы строкі не былі равны между собой і шлі попорядку(задержка в 0.00001сек ілі .. нууу... максімум 0.02 секунды.). Зачем? Прога думает долго, новый-столбец-ключ делать дополнітельно не охота, так вот на каждую строку по 0.02 секунды - вот тут как раз ключ і получается. Подскажіте, что да как і хітро лі. Ілі можно ешьче умнее?
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Dim r0 As Double
Dim r1 As Double
 
Private Sub CommandButton1_Click()
     
     i_temp2 = 1
     For i_temp1 = 1 To 100
        r0 = Now
        r1 = r0
        While (r1 - r0 < 0.000000000000001)
            r1 = Now
            Worksheets("Sheet3").Cells(i_temp2, 1) = r1
            i_temp2 = i_temp2 + 1
        Wend
        i_temp2 = i_temp2 + 1
    Next i_temp1
End Sub
Так вот проблема в том, что этот код не работает. Вот что оно, пішет.

38595.8455092593000000000000
38595.8455092593000000000000
38595.8455092593000000000000
38595.8455092593000000000000
38595.8455092593000000000000
38595.8455092593000000000000
38595.8455092593000000000000
38595.8455092593000000000000
38595.8455092593000000000000
38595.8455208333000000000000
38595.8455208333000000000000
38595.8455208333000000000000
38595.8455208333000000000000
38595.8455208333000000000000
38595.8455208333000000000000

То есть, чісла меняются посекундно. А надо до сотых хотя бы. Как лечітся это дело? Спасібо.


Сделал теперь вот так: заменіл r1=Now на r1 = CDbl(Now) + (i_temp2 / 1000000000#)

Но через тысячу лет актуальная программа перестанет работать І, возможно, даже раньше))

З.Ы. і как сделать Sleep, pause delay ілі что-ніть в этом роде на 10 мсек? Может кто поведает? ТОгда і все эті проблемы отпадут самі собой.
Спасібо.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.11.2011, 05:08
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Нужны сотые доли секунды, а считает целыми (VB):

Определить текущий день недели, год, месяц, число, а также текущее время-часы, минуты, секунды, сотые доли секунды. - C++
1. Составить программу на языке Си , используя функций прерывания 21h. Определить текущий день недели, год, месяц, число, а также текущее...

В mathcade в графике (где задают индексы) надо указать сотые доли - MathCAD
в mathcade в графике (где задают индексы) надо указать сотые доли, чтобы было видно пересечение двух графиков. если просто поставить...

Как показать доли секунды в FormatDateTime? - Delphi
Как показать доли секунды в FormatDateTime?

Окно появляется на доли секунды и исчезает - C (СИ)
Привет всем! пожалуйста подскажите,я только недавно начал изучать С++ купил книгу Брэдли Л.Джонса и Питера Эйткена &quot;Освой самостоятельно...

Программы на C++, созданные в NetBeans 7.3.1, запускаются на доли секунды - C++
У меня Win Xp SP 3. Установил среду NetBeans 7.3.1 с компилятором Cygwin. Программы дебажатся и проекты билдятся, но вот результат —...

Программа запускается и в течение доли секунды вылетает - Delphi
Программа запускается и в течение доли секунды вылетает.Компилятор не ругается.Все норм. Сама программа использует Winsock2,AlphaSkins и...

3
dieman
0 / 0 / 0
Регистрация: 10.08.2011
Сообщений: 25
09.11.2011, 07:16 #2
А как на счет таймера!
Там на 10 сек. твои будут
0
Alexey Spirin
1 / 1 / 1
Регистрация: 18.10.2007
Сообщений: 1,750
09.11.2011, 13:11 #3
Ну что за народ пошел, а?
А поискать никак не судьба и найти API функцию Sleep ???
Нов любом случае это бред. Добавь ключевое поле и не мучайся.
0
Insolent
12.11.2011, 23:27 #4
Попробуй вместо Now использовать Timer(не контрол, а обьект), может поможет)))
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
12.11.2011, 23:27
Привет! Вот еще темы с ответами:

Компьютер подвисает на доли секунды с постоянной периодичностью - Windows 7
Собственно где-то раз в час или в два комп подвисает, как при обращении к датчикам (как например в Everest'е). Недавно поменял материнскую...

Загруженность ЦП - 100% (не снижается даже на доли секунды) - Удаление вирусов
Здравствуйте! Выполняла поиск по форуму, но ничего конкретного не нашла со способами устранения проблемы, то так же буду признательна]....

Не загружается калькулятор: на доли секунды появляется и сразу исчезает - Windows 10
Уважаемые, перестал загружаться Калькулятор, т.е. на доли секунды появляется изображение калькулятора и все сразу исчезает. Как вы...

Монитор Chimei cmv 948a включается на доли секунды - Мониторы
Здравствуйте. Есть нерабочий монитор chimei cmv 948a. При включении появляется изображение с подсветкой на доли секунды и пропадает....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru