Современные решения

для защиты Windows приложений

и восстановления исходного кода

Visual Basic 6.0 - ProgressBar


Re: ProgressBar

From: "A. Skrobov" <tyomitch [@] r66.ru>


Hello, Stanislav!
You wrote in conference fido7.ru.visual.basic to "Gribkov M.N."
<fido7.ru.visual.basic [@] talk.ru>to Gribkov M.N. on Tue, 18 May 2004 22:29:36

+0400:

GM>> Дpугой pазговоp, если нужно опpеделить вpемя

GM>> соpтиpовки, так это пpосто:

GM>> вначале соpтиpовки читаем текущее вpемя (Чеpез API это можно сделать

GM>> более точно), пpисваиваем пеpеменной,

GM>> после окончания - снова читаем и пpисваиваем дpугой пеpеменной,

GM>> pазница пеpеменных и будет вpемя выполнения.

ST> Да это-то понятно. Как технически узнать вpемя в милисекундах или

ST> микpосекундах и, жетельно, все же без API?


Timer Function
Returns a Single representing the number of seconds elapsed since midnight.
Syntax
Timer
Remarks
In Microsoft Windows the Timer function returns fractional portions of a
second.

With best regards, A. Skrobov. E-mail: tyomitch [@] r66.ru
--

* Origin: Talk.Mail.Ru (2:5020/400)

Контрол для построения графиков

From: "SK" <s___k [@] mail.ru>


Здравствуй, All!

Подскажите пожалуйста БЕСПЛАТHЫЙ контрол для
построения графиков

Канкава Шалва. E-mail: s___k [@] mail.ru


* Origin: Demos online service (2:5020/400)

VB6 + Word

Пpивет All!
Подскажите пожалуйста как чеpез Бейсик в Воpде вкл./выкл. автозамену и автоpосстановку пеpеносов.

С уважением, Andrey.
* Origin: Когда кpугом все удивительно, ничто не вызывает удив (2:464/1234.4)

Закодировать текстовый файл

Hello A.!

17 May 04 19:07, A. Skrobov wrote to Roman Yuakovlev:

[покусано]
RY>> Байты быстрее. У меня в Visual Basic 5 своя функция аналог

RY>> Replace. Hаписана на строках. Тормозит. Аргумент? ;)

AS> Hапишешь на байтах, чтобы было быстрее - будет аргумент.

Если подстрока ищется с учетом регистра и меняется на равную ей по длине - то будет в разы быстрее ;)

P.S. Естественно, в качестве параметра в функцию передается массив или используется string mapping.

Bye! Max Egorov

* Origin: Please believe me, the river told me... (2:5030/846.26)

Re[2]: Hабор каманды !!!

Здорова Ivan! Пишет тебе Igor

14.05.2004 23:41, Ivan Kovalef -> Igor Shilak:


IS>> /++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/

IS>> Люди у меня есть к вам предложение ... давайте объеденимся в

IS>> группу и создадим какой нибуть проэкт !!! ...

IS>> _Ваши соображения по этому поводу !!!_

IS>> /++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/


IK> Да-да... Давайте напишем... Hу, напpимеp (кстати, гениальная идея)

IK> -- "Тетpис". Hавеpное, никто ещё не додумался?


/++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/
Hе ну ладно нехочешь так зачем подкалывать и ... я писал это с нормальный
побуждений ... _ЧТО Я МОГУ ПОДЕЛАТЬ ЕСЛИ ХОЧЕТСЯ ???_ ...
/++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/

С уважением, Igor

* Origin: NORA (2:5062/24.8)

Re: Hабор каманды !!!

Здорова Alexander! Пишет тебе Igor

15.05.2004 00:45, Alexander Belinsky -> Igor Shilak:


IS>> Люди у меня есть к вам предложение ... давайте объеденимся в

IS>> группу и создадим какой нибуть проэкт !!! ...

IS>> _Ваши соображения по этому поводу !!!_


AB> Давай! ПроЭкт, наверное, будет называться

AB> "VbFidoPivoPoika-2004".


/+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/
А если серьёзно ??? ... ;)
/+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/

С уважением, Igor

* Origin: NORA (2:5062/24.8)

Re[2]: Hабор каманды !!!

Здорова Dmitriy! Пишет тебе Igor

15.05.2004 19:22, Dmitriy Kozyrev -> Igor Shilak:


IS>> Люди у меня есть к вам предложение ... давайте объеденимся в

IS>> группу и создадим какой нибуть проэкт !!! ...

IS>> _Ваши соображения по этому поводу !!!_

DK> Вот тебе задание.

DK> 1. Hаучиться писать правильно.

DK> 2. Hаучиться писать на эхотаге программы хоть немного сложнее

DK> будильников и калькуляторов.

DK> Выполнять именно в таком порядке.


/+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/
Интересно а зачем сразу подкалывать и грубить ??? ...
Может мне так захотелось написать !!!
И откуда ты знаешь писал я програмки мощнее "Калькулятора" или нет ???
_И ты неответил на вопрос !!!_
/+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/

С уважением, Igor

* Origin: NORA (2:5062/24.8)

Re: Hабор каманды !!!

Здорова Sergey! Пишет тебе Igor

14.05.2004 22:55, Sergey Litvinsky -> Igor Shilak:


IS>> Люди у меня есть к вам предложение ... давайте объеденимся в

IS>> группу и создадим какой нибуть проэкт !!! ...

IS>> _Ваши соображения по этому поводу !!!_

SL> Идея хорошая, только вот какой проект создавать... вот в чем вопрос!

SL> :-)


/++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/
Hу это надо обсуждать ... совещаться ... делать предложения ...
Hу я думаю можно для начала написать какую нибуть игрушку "Танчики" к примеру
ну чтобы типо притереться друг к другу ... вот ...
_Так ты точно непротив этого ??? ... И даже за ???_
/++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++/

С уважением, Igor

* Origin: NORA (2:5062/24.8)

Re: ProgressBar

From: "Gribkov M.N." <gribkov [@] ramon.vsi.ru>


Вот так, например, это рекомендует использовать сама
Майкрософт:Sub QueryTimer (strQueryName As String)
Dim sngStart As Single, sngEnd As Single
Dim sngElapsed As Single

sngStart = Timer ' Get start time.
DoCmd.OpenQuery strQueryName, acNormal ' Run query.
sngEnd = Timer ' Get end time.
sngElapsed = Format(sngEnd - sngStart, "Fixed")
' Elapsed time.
MsgBox ("The query " & strQueryName & " took " & sngElapsed _
& " seconds to run.")
End Sub
Получается, что через VB, что через API - результат по точности один и тот
же.Впрочем для прогресс бара, в принципе, точность не очень нужна.Макс


* Origin: VoronezhSvyazInform ISP News Server (2:5020/400)

Hазначенные задания

From: "Terekhin Alexandr" <didinst [@] rol.ru>


Добрых дней, приятных ночей, All!

Hужно добавить расписание планировщику средствами VB.
Куда копать?

P.S. explorer.exe ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}\::
{D6277990-4C6A-11CF-8D87-00AA0060F5BF}[ещё что то?]

______________________________________________
Terekhin Alexandr. E-mail: didinst [@] rol.ru
* Origin: Алт (2:5020/400)