Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
 
Рейтинг: Рейтинг темы: голосов - 2, средняя оценка - 5.00
fever brain
oh my god
1101 / 575 / 108
Регистрация: 05.01.2016
Сообщений: 1,769
Записей в блоге: 7
25.11.2017, 18:09 #221
Битовые операции

Решил тоже показать как это работает



хотя многие и так знают

Топик:

Добавлено через 15 минут
Ниже архив в котором скомпилированный exe (это если у кого нет редактора VB6)
2
Вложения
Тип файла: rar Xor.rar (5.0 Кб, 4 просмотров)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.11.2017, 18:09
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Готовые решения и полезные коды на Visual Basic 6.0 (VB):

Продам готовые коды и решения на Visual Basic за 400 рублей
душу продаю:cry: Продам коды исходные на VB !!10 лет копил за 400р !!размер...

Коды на Visual Basic
Ребята всем привет,я начел изучать "Visual Basic"! Очень буду благодарен за...

Вывод решения вместо Immediate в textbox (visual basic 6.0)
программа выводит решение в Immediate а я хочу разместить на форме text1 и что...

Вычисление значений функции двух переменных в Visual Basic - Visual Basic
Помогите пожалуйста! В среде VB написать программу вычисления значений функции...

Где бесплатно скачать учебник по Visual Basic 6 и Visual Basic .Net ?
Где бесплатно скачать учебник по Visual Basic 6 и Visual Basic .Net

Visual Basic Используя условный оператор if…then, if…then…else или if…then…elseif, разработайте проект для решения следующих заданий:
Пройдет ли кирпич со сторонами а, b и с сквозь прямоугольное отверстие со...

229
Pro_grammer
Модератор
6135 / 2213 / 437
Регистрация: 24.04.2011
Сообщений: 3,873
Записей в блоге: 10
29.11.2017, 17:03 #222
Если приходиться переписывать код с других языков программирования на VB6, то знаете, что все константы из WinApi нужно обязательно декларировать в своём коде. А перед этим их значения надо ещё найти (если не помните их все наизусть ). Я тут заметил, что в PureBasic очень неплохой список встроенных констант, около 15 000. Конечно, не все относятся к WinApi, но и запас карман не трет.
Набросал простенькую программу, которая по этой базе ищет значение константы, и записывает её в формате VB6.
Вот пример работы с кодом на Делфи:
Готовые решения и полезные коды на Visual Basic 6.0
Вписываем в поле поиска константы по очереди, ищем их значения. Все значения собираются в текстовом поле 2, после чего мы просто копируем его и вставляем в свою программу!
Исходный код и готовая программа прилагается
4
Вложения
Тип файла: zip Consnant.zip (228.8 Кб, 8 просмотров)
fever brain
oh my god
1101 / 575 / 108
Регистрация: 05.01.2016
Сообщений: 1,769
Записей в блоге: 7
04.12.2017, 12:23 #223
Шифрование текста методом Вернама

Топик:

2
kreotodr
27 / 25 / 8
Регистрация: 15.08.2014
Сообщений: 520
05.12.2017, 08:43 #224
Иногда бывает необходимо загрзиуть ком, загрузить кучу приложений, и в какойто момент заблокировать комп...

Блокировка компьютера..
Просто и "быстро" всего 7кБ кода

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Declare Function LockWorkStation Lib "user32" () As Long
 
Private Sub Form_Load()
 
      If Command = "" Or Val(Command) <= 0 Or Val(Command) > 65 Then
            MsgBox "Ошибка: Неверный синтаксис командной строки!" & vbCrLf & vbCrLf & "В качестве агрумента должно быть задано в сек, время блокировки рабочей станции. " _
                    & "Допустимые значения 1-65 сек", vbOKOnly, "prgLockAfter"
            Unload frmMain
            End
      End If
 
    tmrTm.Interval = Val(Trim(Command)) * 1000
 
End Sub
 
Private Sub tmrTm_Timer()
    LockWorkStation: Unload frmMain: End
End Sub
0
Вложения
Тип файла: rar prgLockAfter.rar (6.5 Кб, 5 просмотров)
CharlyChaplin
171 / 22 / 2
Регистрация: 28.05.2015
Сообщений: 127
05.03.2018, 12:37 #225
Упражнения для ребёнка младших классов

Выложил сюда свою программу, которую написал для своей 9-и летней дочери, т.к. у неё проблемы с написанием(произношением) английских чисел от 0 до 100 и арифметическим счётом от 0 до 100. Программа ей хорошо помогла и теперь она лучше считает. Соответственно и оформление детское. Произношение английских чисел реализовано при помощи ivona-voice.


Описание:
Реализовано отображение статистики пройденных упражнений, которая сохраняется в самой программе. Никаких дополнительных файлов нет. Появлялась проблема с OCX-календарём, которую обошёл путём создания собственного календаря. Но таблицу MSFlexGrid.ocx пришлось записать в ресурсы программы и при каждом запуске регистрировать, предварительно создав сам OCX-файл, путём чтения файла-ресурса(MSFlexGrid.OCX) из двоичного массива. Файл создаётся во временной папке пользователя.

Реализована привязка статистических данных по имени пользователя Windows и по серийному номеру жёсткого диска. Здесь имеется ввиду серийный номер не логического диска, а физического диска, на котором может располагаться множество логических дисков со своими временными номерами, не имеющими значения после переустановки ОС или форматирования диска. Привязка осуществляется по желанию пользователя. Она нужна для того, чтобы другой пользователь не мог посмотреть(стереть) статистику; том числе и ребёнок без ведома родителей. Если один человек пользовался программой и внёс пароль на изменение статистики, то прежде чем поделиться программой с другим человеком, ему следует очистить статистику, иначе просмотреть её будет нельзя и она не будет накапливаться. Либо можно скачать чистый файл отсюда.

Привязка к компьютеру реализована при помощи шифрования BlowFish и алгоритма хеширования SHA-2(256). По этой причине данные статистики будут недоступны на другом компьютере, т.к. хеши имени пользователя и хеши серийных номеров, являющиеся ключами к шифрованию, будут уникальными. Рекомендуется использовать сразу 2 привязки. Думаю, что вскрывать программу также бесполезно, т.к. кроме зашифрованной строки в ней ничего не будет. "Правильных" ключей программа не знает и расшифровывает с любым ключом. Только результат может оказаться бессмысленным из-за неправильности ключа.

Модули, реализовывающие шифрование BlowFish и хеш SHA-2(256), взяты из открытых источников. В частности BlowFish был взят с официального сайта создателя данного алгоритма, на котором есть ссылка на сайт с исходником, реализованном на VB6. Есть смысл доверять этим исходным кодам, т.к. они располагаются на официальном сайте разработчика алгоритма (Брюса Шнайера) и к тому же код BlowFish исправлялся спустя год после его первого опубликования на том же сайте.
2
Вложения
Тип файла: 7z Masha.7z (5.38 Мб, 6 просмотров)
The trick
Модератор
7342 / 2563 / 752
Регистрация: 22.02.2013
Сообщений: 3,782
Записей в блоге: 76
07.05.2018, 00:16 #226
Процедурная генерация фигур, камера, выбор мышью Direct3D9.

Простой пример 3D сцены с генерируемой геометрией, выбором мышью объектов, управлением камерой, трансформацией объектов с использованием DirectX9. В примере показана базовая работа с нацеленной камерой (вращение вокруг цели, зум, панорама), и объектами (трансформации, генерация). Каждый объект помимо позиции также имеет точку опоры, вокруг которой и осуществляется ориентация его в пространстве. В примере процедурно генерируются сферы, усеченные конусы и параллелепипеды. Для работы нужна библиотека типов (после компиляции не требуется) и модули-аналоги D3DX функций (там же).

4
Вложения
Тип файла: rar SimpleScene.rar (49.9 Кб, 5 просмотров)
The trick
Модератор
7342 / 2563 / 752
Регистрация: 22.02.2013
Сообщений: 3,782
Записей в блоге: 76
07.05.2018, 00:27 #227
Рендеринг объектов в отдельном потоке Direct3D9.

Готовые решения и полезные коды на Visual Basic 6.0

Один человек однажды интересовался как можно в основном потоке просчитывать логику, а в другом визуализировать сцену. В данном примере создается дополнительный поток, в котором происходит рендеринг вертексного буфера, заполняемого из основного потока. Для синхронизации используется критическая секция. Логика в примере выстроена так, что основное приложение пытается захватить общий ресурс и ведется количество неудачных попыток (если поток рендера уже захватил его), при превышение порогового значения неудачных попыток поток рендера принудительно отдает ресурс основному для обновления данных. В основном потоке при неудачных попытках рассчитанные данные теряются, в реальном приложении их можно использовать для просчета физики, теней или кешировать и т.п. Пример требует две библиотеки типов Direct3D9 и модуль для работы с многопоточностью.
6
Вложения
Тип файла: rar SharedResources.rar (17.5 Кб, 2 просмотров)
The trick
Модератор
7342 / 2563 / 752
Регистрация: 22.02.2013
Сообщений: 3,782
Записей в блоге: 76
26.05.2018, 11:39 #228
Direct2D, DirectWrite, WIC.

Всем привет.

Представляю библиотеки типов для работы с Direct2D, DirectWrite и Windows Imaging Component. Также в архиве содержатся вспомогательные модули и примеры работы с данными библиотеками типов. Библиотеки довольно "сырые" поэтому будут дополнятся (новые сущности доступные в Win8 и позже, вспомогательные функции и т.д.) и исправляться различные баги.

Готовые решения и полезные коды на Visual Basic 6.0Готовые решения и полезные коды на Visual Basic 6.0Готовые решения и полезные коды на Visual Basic 6.0Готовые решения и полезные коды на Visual Basic 6.0Готовые решения и полезные коды на Visual Basic 6.0

Скачать.
4
CharlyChaplin
171 / 22 / 2
Регистрация: 28.05.2015
Сообщений: 127
07.06.2018, 08:03 #229
Пользовательский таймер.

Через заданное время: выключает, перезагружает, завершает сеанс, входит в спящий/ждущий режимы, завершает процесс(ы).
Можно задавать время действия, используя календарь, а также делать screenshot перед выполнением действия.
4
Миниатюры
Готовые решения и полезные коды на Visual Basic 6.0  
Вложения
Тип файла: 7z UserEventTimer.7z (305.5 Кб, 8 просмотров)
The trick
Модератор
7342 / 2563 / 752
Регистрация: 22.02.2013
Сообщений: 3,782
Записей в блоге: 76
12.06.2018, 20:17 #230
Модуль для работы с многопоточностью на VB6

Всем привет!
Представляю модуль для работы с многопоточностью на VB6 для Standard EXE проектов. Данный модуль разработан на основе этого решения в котором исправлены некоторые баги и добавлен дополнительный функционал. Модуль не требует никаких дополнительных зависимостей и библиотек типов, работает как в IDE (все функции работают в главном потоке) так и в скомпилированном виде.



Описание работы и сам модуль.
3
12.06.2018, 20:17
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
12.06.2018, 20:17
Привет! Вот еще темы с решениями:

Visual Basic 6 и Visual Basic .NET - в чем различия?
Visual Basic и Visual studio это не одно и тоже? если нет то в чём разница, по...

Отличия версий Visual Basic 6.0 от Visual Basic 6.5?
У меня 3 вопроса: 1.Чем отличается версия Visual Basic 6.0 от Visual Basic...

Кто пишет программы в Visual Studio 2010 на Visual Basic?
Кто пишет программы в Visual Studio 2010 на Visual Basic?

Проблема с установкой Visual Studio вообще и Visual Basic
Точнее, с установкой Visual Studio вообще и Visual Basic в частности. В самом...


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

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

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