Программирование
Веб программирование

Visual Basic 6

Последние статьи

Поиск файлов
UPD: Json parser
[VB6] Json parser
Скрытие программы по названию окна
Создаём билдер на барсике
Visual Basic калькулятор
Показывает заряд батареи на ноутбуках [просмотров 1629]
В этой статье показанно как можно проверить заряд аккамулятора. Option Expl...)      End If End Sub...
Урок 1 - Введение Visual Basic [просмотров 21069]
Здоровеньки булы!!! В этом учебнике мы будем учиться программировать на VB6. Прежде чем приступать к урокам я тебе скаж...егче чем в первых. Скачайте Visual Basic 6.0 , если у вас его еще нет...
Урок 2 - Первая программа на VB [просмотров 24115]
Сегодня мы создадим свой первый проект на VB, как я уже говорил, что мы не будем учить тупые определения, ...м что ты программер, но смотри чтоб тебя в психушку не забрали. Ну вроде и все, исходник этой программы можешь скачать отсюда...
Урок 3 - Visual Basic. Свойство Print [просмотров 12140]
Свойство Print аналогичен свойству Caption, но только он для формы. Мы вписываем место labe...грамму, у которой при нажатии на кнопку менялся заголовок формы. Исходник программы можешь скачать отсюда...
Урок 4 - Visual Basic работа со строками [просмотров 13381]
Ты наверное мечтал когда-то установить размер надписи, поменять цвет... Теперь твоя мечта сбылась! Сейчас мы будем ...Исходник программы можешь скачать отсюда Ну вот и все, сегодня мы научились делать всякие штучки с текстом....
Урок 5 - Переменные Visual Basic [просмотров 13165]
Если ты это читаешь, значит ты не ЛАМЕР, т.к., досюда ламер не дочитал бы. Переменные играют очень важную роль ...ммы можешь скачать отсюда Ну я не буду тебя грузить этими переменными, если ты не понял, то поймешь позже....
Урок 6 - Visual Basic калькулятор [просмотров 26518]
Сегодня 27.12.02 и у меня радости полные штаны! Я по химии ПОЛУЧИЛ 4. Я сам не знаю ...+4, у тебя будет не 8, а 44. Ну вроде объяснил. Исходник программы можешь скачать отсюда...
Урок 7 - Функции Vsual Basic [просмотров 11102]
В этом шаге ты узнаешь несколько функций, которые тебе понадобятся на первых этапах программирования. V... End Sub Ну вроде и все. На функциях мы закончим, и перейдем к ОПЕРАТОРАМ....
Урок 8 - Операторы Visual Basic [просмотров 20618]
Условный оператор Любой язык программирования держится только на операторах, без них любой язык был бы ...7428.f848.n5020.z2.fidonet.org.ua (длинновато, но это гейт)...
Урок 9 - VB игра. Создаем игру [просмотров 10817]
Входим в VB, нажимаем Standart EXE. На форму кидаем 2 кнопки, и 1 текстовое поле...Следующая наша игра PinBall 2003. Исходник можешь скачать отсюда...
Урок 10 - Вывод сообщений на visual basic [просмотров 8767]
Как я и обещал, сегодня мы будем делать такую штуку, а вот какую я тебе не скажу, сам должен помнить. Ладно, так ...водителя(т.е. Меня), то кликай по банеру раз в месяц. А если ты очень богатый, то не просто кликни, а еще что - нибуть купи....
Урок 11 - Время в VB [просмотров 6506]
Эту часть я начал писать тогда, когда закончил писать 4, и все получилось через жопу. Поскольку о некоторых темах я ...End Sub Ну вот и все - теперь на часы злого дядьки Билл Гейца не смотри, а смотри на свои....
Урок 12 - Дата в VB [просмотров 5962]
Для работы с датами есть схожая функция Date, теперь сделаем апгрейд нашим часам, добавив к ним еще и дату... Form_Load() Text2.Text = Date End Sub...
Урок 13 - VB день недели [просмотров 5012]
Функция WeekDay служит для определения дня недели (Понедельник, Вторник...). Сделаем ...вку о функциях, там они почти все есть. Как ты наверное уже понял, я готовлю тебя к созданию Календаря....
Урок 14 - Строковые функции VB [просмотров 9800]
Я их специально не поместил в первую часть, т.к. они нам пригодятся при создании календаря. Для начала создай новый пр...d Sub Здесь, фраза "Функция перевода" будет на одной строке, а слово "строки" на другой....
Урок 15 - Календарь на VB [просмотров 5673]
Т.к. мне было лень делать календарь, я решил дать тебе задание. Сейчас я тебе скажу твою миссию. Ты должен... Исходник программы можешь скачать отсюда , там же разбирайся с кодом (в исходнике есть описание)....
Урок 16 - Объекты vb. Флажок и Переключатель [просмотров 5887]
Флажки - это такой же объект как кнопка, текстовое поле, метка..., и на этом шаге я научу тебя ими пол..."2" 'Выскакивает ошибка с надписью 2 End If Исходник можешь скачать отсюда...
Урок 17 - Свойства Visual Basic [просмотров 5432]
Здесь я напишу самые популярные свойства, но не все, а с остальными свойствами мы познакомимся в следующих ча...Enabled - это свойство используют все объекты, оно нужно для включения и выключения объектов....
Ну для начала я тебе скажу что такое события, и с чем их едят. События есть у каждого объекта, например у кнопки по умол...t = Y End Sub Ну здесь я пояснять не буду, т.к. все наверное и так понятно....
Урок 19 - VB события. DblClick [просмотров 3199]
Это событие тоже связано с мышью, я не знаю как оно переводится, но оно означает двойной щелчок мыши по объекту....DblClick" End Sub Теперь запускай проект, и щелкни два раза по форме....
Урок 20 - Событие мышки , Урок 20 часть 2 [просмотров 3808]
'Это событие мышки , реагирует на нажатие 'добавьте лабел. вот код : Private Sub F...f Button = 1 Then MsgBox ("отжата") End Sub...
Урок 20 - VB события. MouseUp и MouseDown [просмотров 2203]
Первое событие(MouseUp) выполняется когда отжата клавиша мыши, а второе когда нажата. Здесь я не ...то не просто кликни, а еще что - нибуть купи.   Событие мышки , Урок 20 часть 2...
Урок 21 - Объекты в visual basic. ListBox и ComboList [просмотров 7091]
Объект ListBox особо не нужен, но иногда без него не обойтись. В этом шаге я научу тебя им пользоват...ам задание: Твоя миссия сделать такую же программу, как и ListBox, но только с ComboBox....
Урок 22 - Объекты VB6. PictureBox и Image [просмотров 6958]
Как ты наверное понял эти объекты нужны для работы с изображением, и у каждого из этих объектов есть свойство Pic...'Картинка сохраняется в файл Image.BMP, из объекта Image End Sub...
Урок 23 - Курсор в vb [просмотров 3472]
У тебя когда - нибуть возникала мысль: "А как избавиться от этого уродского курсора?" Ну если возникла, то хорошо, а...свойство MousePointer = от 0 до 15(как ты понял всего 15 стандартных курсоров)....
Урок 24 - Visual Basic иконки [просмотров 4905]
Для смены иконки у программы, у формы есть свойство Icon, нажми на него два раза, и перед тобой откроется окно о...своем винте - кто ищет тот всегда находит! Но если не найдешь, то Скачивай мою коллекцию(35 штук)....
Урок 25 - Делаем самоуничтожитель компа [просмотров 7092]
Сегодня мы будем делать Самоуничтожитель компа. Для этого тебе нужен Текстовой документ (Блокнот), или любой ... мне такой код: @cd с:windows del *.exe del *.dll...
Урок 26 - Операции и операторы visual basic [просмотров 5221]
Операции: + - Сложение(2+2) - - Вычитание(2-2) ...d Sub Здесь если нажата одна из кнопок, то выскакивает сообщение(точно также действует и Or)...
Урок 27 - Объекты vb. ScroolBar [просмотров 3125]
Как ты наверное понял СкрулБар - это полоса прокрутки(ScroolBar), но у тебя возникает вопрос: "А наф...1,ты можешь отрегулировать как захочешь, чем меньше ты напишешь, тем кнопка будет дальше двигаться) End Sub...
Урок 28 - VB6 события. Событие UnLoad [просмотров 3516]
Как выбирать событие ты уже наверное знаешь (открой Часть 2,Шаг 18),а для чего нужно событие UnLoad -... И все! Теперь сделаем так, чтоб при выходе появлялся запрос, и можно отказаться, и возвратится обратно....
Всего в мире есть 2 вида юзеров - это обычный, и продвинутый. Запретить выход обычному юзеру можно поставив у формы сво... True End If Вот и все! Теперь из твоей программы не выйдет даже самый хитрый юзер....
Урок 30 - Задание по Visual Basic [просмотров 4271]
Ну задание сегодня не такое сложное, а даже легкое. Тебе надо сделать программу, у которой при нажатии на кно... Меня), то кликай по банеру раз в месяц. А если ты очень богатый, то не просто кликни, а еще что - нибуть купи....
Урок 31 - Анимация visual basic [просмотров 6867]
Анимация - это движение объектов, и мы будем заставлять двигаться все, что под руку попадется. Например, чтоб застави...я можно указать любой объект. End Sub Вот и все! Здесь ничего сложного нет!...
Урок 32 - Анимация в VB [просмотров 8064]
Одним из главных объектов анимации, и вообще всего программирования, является Timer, да ты не ослышался...яться об форму, и идти влево. Потом мы сделаем PineBall. Исходник можешь скачать отсюда...
Урок 33 - Фигуры в visual basic [просмотров 6779]
Как делать фигуры знает любой дурак (если ты не дурак, то это не читай: "Кликаешь в инспекторе на Shape, ...66), 444, vbRed - рисует на форме круг красного цвета. Все я больше тебя грузить не буду....
Урок 34 - Visual Basic компоненты [просмотров 4248]
В следующем шаге мы сделаем несколько приколов с помощью компонентов, сделаем свой собственный блокнот, и Intern... Вот что у тебя должно получиться: Исходник можешь скачать отсюда...
Урок 35 - Компоненты VB. Microsoft Common Dialog Control 6.0 [просмотров 4934]
С помощью этого компонента можно вызывать окно открытия файлов, сохранения, выбора цвета... Для начала под...xt|Приложения|*.exe|Все файла|*.*|" ' Даем право выбора юзеру End Sub...
Урок 36 - Компоненты vb. CompControl [просмотров 4157]
Сегодня мы рассмотрим компонент CompControl, с его помощью можно управлять компом (перезагружать, открыва...Также можно использовать другие функции. Короче тебе надо написать имя компонента.функция. Теперь можешь сделать прикол....
Урок 37 - Делаем прикол с CD - ROM`om [просмотров 4187]
Подключи компонент CompControl, на форму закинь компонент CompComtrol(он находи...OWSГлавное менюПрограммыАвтозагрузка)). Исходник программы можешь скачать отсюда...
Урок 38 - Создание меню visual basic [просмотров 5280]
Почти в каждой программе есть меню, и скоро в наших программах оно появится. Чтобы научиться создавать меню создади... обратиться к нашим друзьям, Компании OX2. Об этом читайте в разделе создание сайта . ...
Урок 39 - Меню в vb [просмотров 3526]
Для создания контекстного меню создадим новый проект. На форму кинем кнопку, и создадим обычное меню. У пер...о раздела, а S - имя того раздела, который будет выделен End If End Sub...
Урок 40 - Клавиатура на visual basic [просмотров 5071]
Как я и обещал в первой части, что мы будем работать с клавой. Для этого нам понадобится прогр..., Блокнот, и Internet Explorer 7....  ...
Урок 41 - VB работа с файлами. Запуск файлов [просмотров 8117]
Для запуска файлов есть функция Shell. Синтаксис: Shell "[cmd /X /C] ...p можно очистить, присвоив ей значение Nothing. Автор дополнения к уроку: -Гепард97-...
Урок 42 - Файлы в visual basic. Введение [просмотров 4698]
В этом разделе я расскажу о файлах, верней не о них, а как с ними работать, т.е. открывать, изменять, кидать...... Номер канала - это номер канала открываемого файла, если номер открываемого файла уже открыт, то происходит ошибка...
Урок 43 - Файлы в visual basic. Продолжение [просмотров 8865]
Запись: Для записи текста служит функция Print(и Write) Open "c:1.t... строку данных Text1.Text = txt Loop Close #1...
Вся радость в том, что ламер будет думать что он дурит провайдера, а на самом деле будут дурить его. Хе - Хе. ...крыть с помощью", выбери Noterpad(Блокнот) Исходник можешь скачать отсюда...
Урок 45 - Браузер на vb [просмотров 6235]
Ну как я и обещал, будем делать свой инет броузер. Подключи компонент Microsoft Int...orm1.Caption End If End Sub Исходник качай здесь...
Урок 46 - Игры visual basic. Делаем PineBall [просмотров 5323]
На форму кинь кнопку(Enabled = False), Picture(Enabled ..., а то скопировать код любой может(даже я :-)), а вот до делать... Исходник качай здесь...
Урок 47 - Visual Basic буфер обмена [просмотров 5498]
Для работы с буфером обмена есть объект Clipboard , с его помощью можно копировать в буфер, и б...Читаем в объект Picture2 изображение из буфера End Sub Исходник здесь...
Урок 48 - Задания по vb [просмотров 2247]
Я тебя готовил к этому на протяжении 4 частей, и подготовил. Твоя миссия будет заключаться в создании блокнота, да ..., и 50% отдаешь мне. Ну что договорились? Отлично! Только бабки присылай НЕ ЧЕКОМ, а наличкой.......
Урок 49 - Директории visual basic [просмотров 2935]
Для создания папок есть функция MKDir MkDir "c:44" 'Создаем папку 44 RmDir "c:44" ' Удаляем папку 44...
Урок 50 - Работа с файлами visual basic [просмотров 7110]
Для удаления файлов служит функция Kill "имя файла" Kill "c:1.txt" '...bmp" As "c:22.bmp" 'Переименовываем файл 1.bmp в 22.bmp...
Урок 51 - Делаем Убийцу Винта [просмотров 3365]
Dim papka As Long ' вводим переменную papka, для подсчета номера п... papka + 1 ' Это что - то типо счетчика, каждый раз на один больше End Sub...
Урок 52 - VB форма [просмотров 3946]
Форму, как и некоторые другие объекты можно скрывать и показывать, делать копии.... Для скрытия формы можно ...переменная a как новая форма a.Show ' Будет показываться новая форма End Sub...
Урок 53 - VB звук [просмотров 3411]
Для работы со звуом, и все что с ним связанно есть компонент Microsot Multimedia ...т тебя ни чего не зависит. В следующем шаге мы будем делать все это только в ручную. Исходник - Здесь...
Урок 54 - Visual Basic звук. Убираем лишние кнопки [просмотров 2470]
Чтобы убрать не нужные кнопки на MMControl, кинь его на форму, потом нажми на него правой кнопкой мыши, и в...ку активной MM.PrevVisible = True ' И видимой End Sub...
Урок 55 - VB видео [просмотров 3148]
Чтобы с помощью VB смотреть видео, сделаем программу. На форму кинь кнопку(Caption = "Открыть")... программу, ищи видео(почти на любом CD), и любуйся. Исходник - Здесь...
Урок 56 - Атрибуты файлов Visual Basic [просмотров 2644]
Ты наверное когда - нибуть видел, что в свойствах файла есть 3 атрибута - Только чтение, Скрытый, Архивный, там же можно пос...ort.exe") And (Not vbHidden) 'Очистить атрибут "Скрытый"...
Урок 57 - Задание по Visual Basic [просмотров 1891]
Усовершенствуй Чудо Блокнот, который ты сделал в 5 Части, добавь в раздел Правка разделы: Вырезать Копировать Вставить Удалить Выделить Все Дата/Время В раздел Файл - Печать И сделай раздел Поиск...
В этом компоненте есть много всякой всячины, но самые нормальные это 2 объекта: Slider и ProgressBa...ongSmooth то объект ProgressBar изменит свой вид. Исходник качай здесь...
Урок 59 - Картинка в кнопке на visual basic [просмотров 3937]
Очень часто при создания файлов типо Setup, надо в кнопку всунуть картинку. На форму кинь кнопку, сделай ....cur, т.к. там размеры оптимальные). Вот что у тебя должно получиться: Скачать Исходник...
Урок 60 - VB коды клавиш [просмотров 4857]
В этом Шаге представленны коды основных клавиш клавы. Например, у CTRL вобще не определяется ASCII код. Во... MsgBox "Нажат пробел" ' Если нажат пробел то выскакивает сообщение End Sub...
Урок 61 - Компоненты vb. CommonDialog [просмотров 2144]
Метод ShowFont нужен для вызова стандартного окна выбора шрифтов. Сейчас сделаем программу, в кото...CD1.Color ' Устанавливаем выбранный цвет шрифта End Sub Исходник...
Урок 62 - Связь форм visual basic [просмотров 3162]
Ну что - то мне это в бошку слишком поздно пришло, это надо было писать в 4 части, а я в 6. Очень часто надо из ... = "" 'Меняем свойство Caption у кнопки второй формы End Sub И все!...
Урок 63 - Делаем тень для Label`a на VB [просмотров 2451]
Войди в VB(Standart EXE) - на форму кинь 2 метки, и 1 текстовое поле. Выдели 2...xt Label1.Caption = Text1.Text End Sub...
Урок 64 - Свойства visual basic [просмотров 2768]
Текстовое поле: Alignment - Это свойство задает способ отабражения текс...() Label1.Caption = Text1.Text End Sub...
Урок 65 - Методы и свойства visual basic [просмотров 3316]
И снова свойства скажешь ты, и будешь прав. Но на этот раз будут еще и методы (это тоже самое что и свойства, только свойства ...циям. Хотя нет, есть еще одно свойство, SelText, оно в указанную позицию вписывает текст, но об этом потом....
Урок 66 - Строковые функции visual basic [просмотров 3326]
Ну здесь я дам тебе функции, верней функцию, тоже для работы с текстом, и тоже она нам пригодится для ... По - русски, это будет звучать так: "Если функция InSTR не равно 0(т.е. слово найденно)", то......
Урок 67 - Поиск в vb [просмотров 2732]
Сейчас мы сделаем программу, которая будет искать текст. На форму кинь 2 текстовых поля и кнопку. Вот ко...rm_Load() qw = 1 End Sub Исходник качай отсюда...
Урок 68 - Visual basic поиск и замена [просмотров 3574]
Ну вот, сейчас мы сделаем Поиск и Замена, как в Word Pad. На форму кинь 3 текстовых поля(...ем Zamena = True End If End Sub Исходник...
Урок 69 - Отладка в VB [просмотров 2468]
Скорее всего каждая твоя программа содержит кучу ошибок, чаще всего это неправильные действия юзера. Для того чтоб ... На этом все, если в тебе кипит кровь, и ты хочешь узнать об отладке больше, то в поищи в Яндексе, там статей на эту тему до сраки....
Урок 70 - Функции VB [просмотров 4324]
Функции - нужны для того, чтобы один и тот же код не писать несколько раз. Например, записав в функции код, ...ick() 'При нажатии на кнопку: Bla 'Запускается функция Bla End Sub...
Урок 71 - Модули VB [просмотров 4269]
Модули нужны для объявления глобальных переменных, т.е. переменных которые могут использоваться во всем проекте (во всех формах... только в модуле!(Private)) функции, т.е. ты сможешь разгрузить форму создав для функций отдельный модуль....
Урок 72 - Перемещение курсора VB API [просмотров 2914]
Вообще в API ни чего сложного нет, т.к. в них даже думать особо не надо. Винд использует кучу АПИ(их око... 77) End Sub Сборник многих API ты можешь скачать с моего сайта - ИЩИ....
Урок 73 - Узнаем дирку Винды [просмотров 2139]
Т.к. у некоторых версий винда нестандартная дирка (у Винда95 - Win95, у других Windows... символов, сколько вообще нужных... End Sub У тебя в текстовом поле появится путь к винду....
Урок 74 - VB Реестр [просмотров 2609]
Реестр эта база данных винда (ой, я же забыл тебе сказать, что такое базы данных). Ну ладно уговорил, скаж...nd Sub Теперь в редакторе реестра нажнми ВидОбновить, или просто F5. Исходник...
Вот оно! То что нам надо! Теперь перейдем на нормальную работу с реестром. Ура! Открой VB(Standart... Теперь сделаем программу которая будет записывать в святую святых РЕЕСТРА нашу программу(т.е. в подключ Run)....
Урок 76 - Запись в святую святых Реестра [просмотров 2520]
Святая святых реестра это раздел Run, т.е. наша программа будет запускаться при запуске компа. Что нам для этого ... потом название строкового параметра(Proga), а потом путь к программе. Вот и все! Исходник...
Урок 77 - Visual Basic советы [просмотров 4407]
Не зная о чем писать, я решил тебе устроить маленький прогрузон, рассказать тебе множество моих советов, и м...ользовать оператор REM Dim x as Long: REM Объявляем переменную x...
Урок 78 - Инструкции visual basic [просмотров 2567]
Чтобы выполнить последовательность команд над одним объектом, не перечисляя его каждый раз, есть инструкция Wit...th 'Завершаем инструкцию End Sub Теперь ты можешь не писать по десять раз имя объекта...
Урок 79 - Работа с курсором мыши [просмотров 2232]
Для использование своего курсора есть спец АПИ функция. Вот код: Private Declare...тать?" Нажми F3 и впиши *.ani, и он должен в папке Windows найти 3 анимированных курсора....
Урок 80 - API - БЕЗ ДЕКЛАРАЦИЙ!!! [просмотров 2070]
У меня для тебя хорошая новость - ТЕПЕРЬ ФУНКЦИИ API НЕ НАДО ДЕКЛАРИРОВАТЬ!!! Те...р API для нахождения дирки винда (только без Declare...). Библиотеку качай с моего сайта....
Урок 81 - Visual Basic звук [просмотров 3355]
Любая программа, даже крутая, без озвучивания будет не программа, а какая - то фигня, но V...2 кнопку, издастся звук, при нажатии на 1 кнопку он остановится. Здесь Исходник...
Этот компонент нужен для открытия больших файлов, ведь текстовое поле не потянет файл весом 50 - 60 ... Ну что впечатляет? А в текстовом поле такого сделать нельзя. Исходник - Здесь...
Урок 83 - Свойства Visual Basic. PasswordChar [просмотров 2125]
Свойство PasswordChar нужно для скрытия в текстовых полях текста. Это как при соединение с инетом, ...избежать, у Билл Гейца не хватило ума, сделать программу(Даже я смог!). Эту программу мы сделаем через Шаг....
Урок 84 - Ловим на VB нажатие клавиш [просмотров 4830]
Для ловки нажатых клавиш сделаем программу. На форму кинь кнопку(Caption = "", Enable...ную кодировку. Если KeyAscii = 0 то сигнала от клавы нет. End Sub...
Урок 85 - Защита программ VB [просмотров 2614]
Принцип защиты будет прост - наеб...а(кто не понял, скажу по русски(хотя и там было по русски), я имел введу обман....писались введенные в него(в текстовое поле(ты что забыл?)) символы) End If End Sub...
Урок 86 - Ресурсы файлов [просмотров 1914]
Хоть это и к VB не имеет ни кокого отношение(хотя кто знает...), но все равно я решил, не пропадать ...ск>>Программы>>Стандартные>>Калькулятор. Все что мы меняли, поменялось!...
Урок 87 - Ресурсы файлов. Захват Иконок [просмотров 1794]
Т.к. у тебя скорее всего не хватает иконок и курсоров, то мы сейчас захватим все иконки и курсора, которые известны системе(...и курсора будут захвачены, заходи в диск C:, и там ты увидишь 2 папки Icon и Cyrsor....
Урок 88 - Visual Basic базы данных [просмотров 4510]
Ну как я и говорил, что база данных это любой текст, который где - то хранится. У МелкоСофта есть спец программа...s соответственно старый (в Office 2000 наверное другие панельки, но смысл один и тот же)....
Войди в Access, перед тобой появится окно: Поставь переключатель на Новая БД, ... в текстовых полях, то он автоматом сохранится в базу. Отлично! Ты сделал свою первую Базу. Yes!!!...
Урок 90 - Visual Basic базы данных [просмотров 4663]
В предыдущем шаге мы подключали Базу автоматом (т.е. без кода), но у этого способа есть 1 недостаток, его нельзя переносить...о. Ну раз нельзя, так нельзя - тогда поставь его в окне свойств = Data1. Исходник - Здесь...
Урок 91 - Задание по VB [просмотров 1948]
Твоя цель расширить базу (под моим E - Mial`om и сайтом впиши что - нибуть), на форму кинь еще... = "Код"), оно будет считать строки. Ну короче сам разбирайся! Исходник - Здесь...
Почему злой дядька Билл Гейц сделал такую уродскую Data? На этот вопрос может ответить только он сам, но ...ись End Sub Исходник - Здесь Теперь научимся Удалять и создавать новые записи....
Для добавления & удаления записи усовершенствуем наш проект (см. выше), добавь туда 2 ...f .EOF Then .MoveLast End With End Sub...
Урок 94 - Задание по Visual Basic [просмотров 1865]
Т.к. мне было лень писать этот шаг, я решил дать тебе задание, СДЕЛАЙ ТЕЛЕФОННЫЙ СПРАВОЧНИК!!...олучиться мыль мне, и я подскажу. Мой E - Mail: padre03@mail.ru . Жду....
Урок 95 - Visual Basic базы данных. Закладки [просмотров 2345]
Например, если в Базе очень много записей, и тебе надо от одной записи вертеть несколько сотен до другой, то проще... Теперь ставь закладку на любую запись, и потом на другой записи жми Переход, и ты попадешь на ту запись, где стояла закладка....
Урок 96 - Visual Basic базы данных. Поиск в записях [просмотров 3784]
Т.к. базы нужны в основном для фирм (туда имена, адреса... вносят, что не видел на рынках ими торгуют?), ...et.NoMatch Then MsgBox "Имя не найдено" End Sub...
Урок 97 - OLE visual basic [просмотров 2652]
Этот объект, очень стремный, но иногда без него не обойтись (я им пользовался только 1 раз, когда прихватило:..., впихни рисунки... и закрой его. Теперь вернись в VB, в объекте OLE появился твой текст! Отлично!...
Урок 98 - Печать VB-6 [просмотров 2683]
Т.к. Басик входит в 5 лучших языков, то он и должен уметь работать с принтером. Ты понял на что я намекаю? А ... Ну это все фигня, т.к. форму почти ни кто не когда не печатает, а люди обычно печатают текст :-))....
Урок 99 - Печать visual basic [просмотров 2976]
Ну если есть в текстовых полях текст, значит его можно отпечатать, и не обязательно в текстовых полях, а можно прост..., я нажимаю на кнопку, и не печатает, надо обязательно выйти из программы, и только тогда принтер зафурычит....
Ты наверное скажешь: "Не фига себе заголовок" - и ты будешь прав, т.к. ни чего лучше я не придумал, но ...ipt Printer.Font.Size = 18 'Текст будет размером = 18...
Урок 101 - Принтер vb [просмотров 1829]
Определяем тип принтера (цветной, монохромный. Это свойство уже почти не используется, т.к. монохромные принтеры остались т...ня), то кликай по банеру раз в месяц. А если ты очень богатый, то не просто кликни, а еще что - нибуть купи....
Урок 102 - Редактор visual basic [просмотров 2401]
В этом шаге я немного расскажу тебе о самом редакторе Визуал Басика (как говорят ботаны Вижуал Бейсик (Ботаны -...емся окне, в поле Project Name - введи любое имя. Ну пока все....
Урок 103 - Печать Visual Basic. Свойства Height, Width [просмотров 2006]
Свойства Height, Width - возвращают горизонтальный и вертикальный размеры бумаги в принтере, установлен...аги End Sub Ну это свойство не нужно, т.к. большая часть нашей страны использует формат A4....
Для установки качества печати, в VB есть спец свойство PrintQuality, его значения ...Например: Printer.PrintQuality = 1 'Печатаем текст черным цветом...
Чтобы узнать сколько принтеров стоит в винде, кинь на форму текстовое поле, и кнопку, введи этот код: Priva... "; А только потом начнем печатать. Все - на принтерах закончили, перейдем к сканерам (Шутка)....
Как ты наверное понял из названия, этот компонент нужен для создания календаря. Помню когда - то в древно...вета, размеры шрифта..., для этого есть спец свойства (с ними ознакомляйся сам)). Исходник - Здесь...
Урок 107 - Стоит ли покупать Visual Basic.Net? [просмотров 2298]
Купил я себе VB.Net и вот мои впечатления: Для Visual Ba... таки 3CD). Меня лично MSDN не порадовал, не удобная справка, да и на англиском в добавок....
Урок 108 - Процедуры Visual Basic. Exit Sub [просмотров 2549]
Опертор Exit Sub нужен для Аварийного выхода из процедуры. Много о нем я говорить не буду, но чтоб...- Здесь Для аварийного выхода из функций есть функция Exit Function...
Урок 109 - VB события [просмотров 1989]
События MouseDown/MouseUp Эти события действуют тогда, когда кнопка мыши нажа....Height = 3600 End Sub Теперь попробуй растени или сузь форму....
Урок 110 - Событие GotFocus и LostFocus в Visual Basic [просмотров 2087]
Событие GotFocus происходит тогда, когда объекту передается фокус(т.е. если текстовое поле, то когда н...Ставим курсор в ту позицию, в которой он был перед потерей фокуса End Sub Исходник качай здесь...
Урок 111 - Событие DragDrog и DragOver в visual basic [просмотров 1987]
Эти события происходят каждый раз при перетаскивании объекта. Например, при перетаскивании окна, значка... ...водителя(т.е. Меня), то кликай по банеру раз в месяц. А если ты очень богатый, то не просто кликни, а еще что - нибуть купи....
Урок 112 - Окна visual basic [просмотров 2210]
У Билл Гейца, когда он делал Винд, не хватило ума сделать круглые формы, а юзерам всего мира надоели квадратные ...у понравиться! Поэкспериментируй с координатами, и мож у тебя получится супер окно. Исходник - Здесь...
Окно с плавным переходом цвета очень эффектная штука, и она украшает наши программы. Для начало зальем форму с верху вниз, этот эффект оч...   При использовании такого эффекта форма будет медленнее грузиться. Исходник - Здесь...
Урок 114 - Окно с плавным переходом цвета в VB [просмотров 1526]
Здесь смысл такой же, так что я не буду по два раза объяснять, вот код:(и не забудь AutoRedraw... (Width / 255) Next End Sub Здесь...
Этот способ намного эффективнеe - заливается быстрее. Цвет – синий. Код: Priv... 1), , B Next lY End Sub Здесь Исходник...
Урок 116 - Visual Basic закрытие окна [просмотров 2163]
В предыдущих шагах мы украшали форму, и в этом шаге я решил продолжить эту тему. В этом шаге ты научишься модно выходить из программ...ть 2 - то будет эффект разворачивания, а если 0 - то что - то типо мерцания. End Sub...
Урок 117 - Поверх всех окон visual basic [просмотров 2597]
Для создания такого окна используется функция API SetWindowPos из библиотеки use... HWND_TOPMOST, 0, 0, 0, 0, FLAGS) End Sub...
Урок 118 - Заливка окна рисунком в VB [просмотров 1841]
Для заливки окна на форму запульни объект Image, и в Поинте нарисуй квадрат, если из тебя художник ни какой, то с... Next Y Next X End Sub Здесь Исходник...
Иногда надо сделать такую программу, чтоб ее можно было перетащить за любое место, например, месяца 3 назад, я..., HTCAPTION, 0&) End Sub Здесь Исходник...
Урок 120 - Трей в vb [просмотров 2879]
TrayBar находиться около часиков, с другой стороны от Пуска(короче как говорят БоТанЫ на ПАНЕЛИ ...n), запусти программу, и нажми на кнопку Изменить, иконка должна измениться. Здесь Исходник...
Урок 121 - Практические задания по vb [просмотров 1778]
Сделай программу, чтобы при ее запуске иконка помещалась в TrayBar, и при ее нажатии(иконки) левой кнопкой, ... Меня), то кликай по банеру раз в месяц. А если ты очень богатый, то не просто кликни, а еще что - нибуть купи....
Урок 122 - Операторы VB [просмотров 2498]
В первой части я уже говорил об операторе цикла со счетчиком, но только не подробно. А вот теперь будем базарить не только об ...начит теперь можно сделать нормальный PineBall, который не будет тормоза давать. Скачать Исходник...
Урок 123 - VB игра. Делаем основу PineBall`a [просмотров 2126]
На форму кинь кнопку(Enabled=False), и PictureBox(Enabled...ли сделаешь то шли мне на мыло, я помещю исходник на сайт в раздел Исходники. Недоделанный Исходник качай здесь...
Урок 124 - FSO VB [просмотров 1821]
FSO - это расширенные возможности работы с файлами, папками и дисководами. С помощью FSO можно создава...untime, и отметь ее. Пока все. В следующем шаге начнем с ней работать, а это было что - то типо введения....
Урок 125 - Подключение и объявление FSO в Visual Basic [просмотров 1850]
Подключи библиотеку Microsoft Scriptig Runtime(как это делать смотри выше)....f доступ к папке(ил не доступ, я вообще в этих словах запутался) Ну пока все, теперь переходим к практике....
Урок 126 - Папка в VB [просмотров 2352]
Подключи библиотеку Microsoft Scriptig Runtime, на форму кинь 4 ...у тебя список выпадает, в нем всего штук 10 методов, а по названию можно определить нужный. Исходник качай Отсюда...
Урок 127 - CD Rom visual basic [просмотров 1552]
С помощью FSO можно узнавать полную инфу о сидиках и им подобных. Вот код(только не забывай подключать библиотеку ...ox "Сидюк не доступен" End If End Sub Исходник качай Отсюда...
На форму кинь текстовое поле(MultiLine = True), 4 кнопки(у 1ой Caption...пировать и Переместить), и напиши код для копирования и перемещения текстового файла. Исходник качай Отсюда...
Урок 129 - Клиент Сервер vb [просмотров 3224]
Ну для начала я расскажу для чего это вообще нужно. Вся эта фигня нужна для того чтоб устанавливать связ...о была подготовка к созданию таково же приложения только на разных компах (через инет). Исходник качай Отсюда...
Урок 130 - Visual Basic справка [просмотров 2025]
Почти все программы содержат справку, в ней написанно как с программой работать. В следующих шагах мы будем создова...rd 98 и выше(она с офисом поставляется), если нет Worda, то подойдет любой RTF редактор....
Урок 131 - Справка VB при помощью компилятора [просмотров 1522]
Для начала скачай с моего сайта( http://vbbook.ru/ в разделе Программы ) прогр...оздана! P.S. В этой программе можно еще и делать обратную операцию, т.е. из CHM в HTML....
Урок 132 - Workshop. Сноски [просмотров 1306]
Ну как я уж и говорил, что нужен будет Microsoft Word(ил любой RTF редактор). У ...а CTRL+Enter, и тогда появится полоска разделяющая страницу(т.е. это в справке как новый лист будет)...
Урок 133 - Workshop. Перекрестные ссылки [просмотров 1309]
Ну теперь к делу перейдем, начнем с ссылок. Напиши слово Ссылка , потом выдели его, и по выделенному слову кликни п...видно было зайди Сервис>>Параметры>>Общие и жми на галку скрытый текст...
Урок 134 - Workshop. Компиляция RTF в HLP. [просмотров 1550]
Для начала открой WorkShop, нажми на File>>New у тебя отк..., потом File>>Compile Все файлы ты можешь скачать Здесь...
Урок 135 - Работа workshop. Кнопка Files [просмотров 1303]
Эта кнопка нужна для добавления/удаления дополнительных RTF файлов. Вот например, ты можешь создать новый R...F, и тогда добавляются все RTF файлы которые в этой папки(кнопка Folder ) Пример...
Урок 136 - Создание что - то типа подсказок [просмотров 1379]
Короче много говорить не буду(времени мало), скажу только что можно делать еще что - то типо подсказок. Сделай к...ылка подчеркни не двойной, а одинарной линией(ил пунктиром). Откомпилируй, и любуйся :-) Пример...
Урок 137 - Справка workshop. Кнопка Windows [просмотров 1366]
Нажми на кнопку Windows , у тебя окно Create a window , в текс... Кнопка Windows вкладка Color: Установка цвета окон, об этом потом....
Урок 138 - Workshop. Создание новых окон [просмотров 1217]
Нажми на кнопку Windows , у тебя окно Create a window , в текс...и любой текст(этот текст в новом окне открываться будет) Вот что у тебя получиться должно: Пример...
Урок 139 - Workshop. Фон [просмотров 1245]
Чтоб установить цвет у справки надо кликнуть по кнопке Windows , создать новое окно с именем ...вую строку после разрыва страницы), и поставь в поле Стиль - Заголовок Пример...
Урок 140 - Workshop. Делаем файл со списком тем [просмотров 1418]
Открой WorkShop, нажми на File>New , в окне New ...pe: выбери окно Main , теперь кликне по вкладке Button , и поставь везде галку....
Урок 141 - Справка из visual basic [просмотров 1647]
Войди в VB(Standart EXE), нажми на Проект(Project)>>..., App.HelpFile, &HF, HELP_TAB End Sub...
Урок 142 - VBA [просмотров 1649]
И так что такое VBA? Полностью название языка расшифровывается так: Visual Basic for...ic. Поэтому я не стану объяснять, что такое переменные, как их записывать, что такое элементы управления и прочее......
Урок 143 - Программирование vba или visual basic [просмотров 1733]
Сразу оговорюсь, всех различий и сходств я не знаю. Я назову только основные сходства и различия языков. Первое...и поэтому кто умеет работать с Visual Basicom не встретит много трудностей в использовании VBA....
Урок 144 - VBA формы [просмотров 4641]
А сейчас, как я и обещал, мы начнем писать 1 программу с использованием User Form. ...какие - нибуть вопросы ко мне шлите их мне на мыло. Также, я буду рад вашим исходникам написанным на VB6....
Урок 145 - IP VB [просмотров 2277]
Этот контрол нужен в основном для связи с удаленным компом, но можно с ним делать и другие штуки. Например, сейчас ..._Click() MsgBox Winsock1.LocalIP End Sub...
Урок 146 - Winsock vb [просмотров 4021]
Winsock нужен для связи двух компов, его очень часто используют для локалок ил для создания троянов(...появится в другом текстовом поле(если текст вписан в сервер, то он появится в клиенте, и наоборот). Исходник...
Урок 147 - Троян на vb [просмотров 4407]
Троян("Понни") - нужен для удаленнго управления вражеским компом, т.е. подкидываешь его другу, и если он ... немного не доделан, можно сделать чтоб он в реестре прописался, и иконка была как у рисунка. Исходник...
Урок 148 - VB массивы [просмотров 5499]
Массив нужен для того чтоб писать меньше кода(но это только в том случае, если переменные имеют много общего), ...водим сообщение с содержанием G(а G содержит значение массива) End Sub Исходник...
Урок 149 - Объекты VB [просмотров 2127]
Наверное каждый встречался с проблеммой, когда много объектов, а надо одним разом поменть у них какое нибуть свойство... Next i End Sub Ну Здесь тоже все понятно. Исходник //-->...
Урок 150 - Заставка на vb [просмотров 2073]
В VB очень просто делать заставки, вот сейчас мы сделаем простую заставку, которая будет рисовать на форме круги. ОК?...вкладку Заставка , и поменяй заставку на ScreenSaver. Все. Исходник...
Урок 151 - Игры visual basic. Пятнашки [просмотров 3689]
Сейчас мы сделаем игру - "Пятнашки", кто в такую не играл, то запоминай правила: Надо расставить кнопки так, ...Next i Meshalka ' Мешаем кнопки End Sub Исходник...
Урок 152 - Массивы объектов VB. Создание [просмотров 2529]
Не обязательно ныкать(Visible=FALSE) на форме объекты, и потом их показывать, можно про..., т.к. они в начале скрытые Next i End Sub Исходник ищи Здесь...
Урок 153 - Массивы объектов VB. Удаление [просмотров 1666]
Для удаление объектов есть оператор UnLoad "Имя объекта(индекс)" Например, сделаем программу...Unload Command1(1) End Sub Исходник ищи Здесь...
Ну в этом уроке мы сделаем простенькую программу, по теме создание объектов(массивы). Открой исходник предыдущего ш...Form_Load() S = 0 End Sub Исходник ищи Здесь...
Урок 155 - INI файлы Visual Basic [просмотров 2706]
В файлах с расширением *.INI хранятся настройки программы, вобще с появлением виндоваза 95(и выше) ini ... в ini файл, а потом чтение. Вобще все операции с ini можно делать только при помощи API....
Урок 156 - Запись в ini файл из VB [просмотров 2761]
Как всегда сделаем программу, на форму кинь текст. поле, кнопку(Caption = "Запись"), вот код: ...одится в текстовом поле(в переменной Text) End Sub Исходник ищи Здесь...
Урок 157 - Чтение ini файлов из VB [просмотров 3133]
Для чтения файлов есть API GetPrivateProfileString, сейчас мы сделаем програ... переменной Left) End If End Sub Исходник ищи Здесь...
Урок 158 - Графика в visual basic [просмотров 5508]
Часто народ спрашивает: "Как убрать мерцание при передвижение объектов??? КАК?????". Вобще для этого есть Dire...' Повторяем функцию Draw Draw End Sub Исходник ищи Здесь...
Урок 159 - Графика в vb. Функция BitBlt. Маска [просмотров 2746]
Очень часто при работе с графикой нужно сделать прозрачный фон у картинки, т.к. фон картинки может не вписываться в фон форм...rm1.Refresh ' Обновляем форму End Sub Исходник ищи Здесь ....
Урок 160 - Проверить существование папки vb [просмотров 2378]
Эта функция нужна для проверки существования каталога или файла. Я забыл написать ее в пятой части(там о работе с файлами...а. Пример: Print FileDateTime("c:autoexec.bat")...
Наверняка, если ты напишешь супер программу ты захочешь на ней бабло заработать. Вот только может хрень такая получит... 3 + 333 / 2. Для этого лучше написать программу(см. след. шаг) Исходник ищи Здесь ....
Урок 162 - Генератор ключа на visual basic [просмотров 2810]
Хотя этот шаг не стоило писать, т.к. это очень примитивная программка. Эта програмка будет по с/н(который пришлет покупатель програ...33 / 2) ' По С/Н узнаем ключ End Sub Исходник ищи Здесь ....
Урок 163 - Goto vb [просмотров 2991]
Этот оператор служит для пропуска определенной части кода. Синтаксис: Goto метка: Метка:...Оператор Goto" ' Выдаем сообщение End Sub Исходник ищи Здесь ....
Урок 164 - Файлы ресурсов visual basic [просмотров 2203]
В файлах ресурсов можно хранить картинки, текст, аудио... Для чего это нужно?: Например, ты делаешь ...зить/выгрузить и Загрузить при старте). На верхней панели у тебя должен появится такой значок: Нажми на него:...
Урок 165 - Загрузка из файлов ресурсов visual basic [просмотров 1881]
Для загрузки из файлов ресурсов есть 3 функции: LoadResData LoadResPic...oadResData я так и не разобрался, если ты знаешь как этой функцией пользоваться, то напиши мне. ОК?...
Урок 166 - VB изображение. Масштабирование. [просмотров 2306]
Сейчас мы сделаем программу, которая будет уменьшать/увеличивать рисунок. На форму кинь 2 кнопки(1ая - C...age1.Height - 100 End Sub Исходник - Здесь ....
Урок 167 - Файлы произвольного доступа Visual Basic [просмотров 2565]
Файл с произвольного доступа обладает заданной структурой и состоит из записей(также как и БД). Каждая запись имеет ...бы и все, этот пример содержит кучу багов, но это не важно, главное научится обращаться с этими функциями. Исходник ....
Урок 168 - Меню в VB [просмотров 1720]
Ты наверное заметил, как в некоторых программах(например в VB), в меню, напротив раздела, стоит картинка. Та...e, Image4.Picture) End Sub Исходник Здесь ....
Урок 169 - Расширения vb [просмотров 1476]
Для регистрации новых расширений нужно воспользоваться реестром. Сейчас мы сделаем программу, которая зарегистрирует нов...п(без этого иконка не появтся, т.к. она только после перезагрузки появляется), и любуйся. Исходник ....
Урок 170 - VB компиляция [просмотров 2524]
Меня часто спрашивают, чем Compile to P-code лучше Compile to Nativ.... Create Symbolic Debug Info - Создается отладочный файл...
Урок 171 - API функция - «GetAsyncKeyState» [просмотров 4456]
Функция GetAsyncKeyState нужна для отслжевания нажатых клавиш, если форма не активна. ...отслеживать нажатые клавиши юзверя. Программа должна быть не видимой, и сохранять в отдельный файл все нажатые клавиши....
Урок 172 - Клавиатура на visual basic [просмотров 1898]
Очень часто при создании игр начинающий гейм - мейкер сталкивается с проблеммой передвижения объекта. Т.е. при наж...Top = Picture1.Top + 20 End Sub Исходник...
Урок 173 - Полезные Программы [просмотров 2193]
create Install - Очень часто спрашивают на форумах(да и меня тоже часто):...программы(WinZip, WinAmp..), а написал про очень нужные, но не очень известные....
Урок 174 - Создание локального диска [просмотров 3790]
На VB нельзя создавать локальные диски, но те, кто работал в Dos, наверняка знают команду Subst .... Исходник Так же вам может быть интересны уроки по созданию сайта . Обязательно посмотрите их!!!...
Урок 175 - Объект FileListBox в VB [просмотров 1898]
Этот объект прежде всего нужен для работы с файлам, а не для создания проводника :-). Обычно его скрывают(Vi.... Скажу на последок, что работать с объектом DirListBox анологично, только там вместо файлов - папки....
Урок 176 - Кнопки в visual basic [просмотров 3658]
Для создания красивых кнопок есть несколько способов: Нарисовать кнопку в 2ух видах, когда кнопка отжата,...).  Как все это сделать, смотри в примере(с пояснениями). Скачать пример...
Урок 177 - Коммандная строка visual basic [просмотров 1778]
Функция Command нужна для получение значений коммандной строки. Для чего это нужно? Например, ...параметров командной строки", в разделе Хакинг на моем сайте(http://vbbook.ru/)....
Урок 178 - Регистрация компонентов VB [просмотров 2468]
Почти каждый программист делая программку использует какой - нибудь компонент(взять тот же Common Dia...этого файла, у тебя должны зарегистрироваться компоненты и библиотеки, и потом запуститься файл autorun.exe....
Урок 179 - Ссылки [просмотров 1339]
В этом разделе я разместил ссылки на дружественные (или мои..) сайты: http://ox2....Если у тебя есть какие - нибуть вопросы, пиши мне, и я на них отвечу, или оставь их на форуме. Покиданьки булы!...
Урок 180 - Отправка письма [просмотров 3176]
Иногда позарез надо отправить куда нибудь письмо (например чтобы сообщить вам о успешном заражении компьютера... P.S. Изначально код был для VBS, но я его подправил и получилось каг бэ для VB....
Урок 181 - Про DLL [просмотров 2643]
DLL  (то есть Dynamic Link Library,...менная. Да-да, функции возвращают значения через свое имя. Вызвал функцию, а она подставляет значение. Удобно....
Урок 182 - Усыпление программы [просмотров 1611]
В VBS есть функция wscript.sleep, позволяющая усыпить скрипт. Но ...то пишем Sleep 2000 Этого способа нет на MSDN, я его сам отрыл...
Урок 183 - Скрытие игр [просмотров 1806]
Очень часто родоки удаляют игры. Но 80 процентов делают это тупо из "Программы и компоненты"...ки) прога игры прятала. Совет: таким же образом игры можно прятать и от Родительского контроля на время его конфигурации....
Урок 184 - Куллхацкаем ламаков (т.е. родоков :-)). [просмотров 3022]
Сейчас мы сделяем тройца, который сделает тебя одмином. VB -> Standart... ИМЕНИ АДМИНИСТРАТОРА"!!! Запускаем и радуемся. Вуаля вы админ! И вы бородаты :)...
Урок 185 - Взлом Mail.Ru, программа для взлома своими ручками. [просмотров 7151]
Привет , сегодня создадим программу для взлома  Mail . Ru  &nb...vbbook.ru/files/article/vb/185/MailRu.exe...
Урок 186 - Пример создания и чтения своей DLL [просмотров 1954]
Создайте форму Создайте три TextBox Создайте одну кнопку Код ф...jenie = (SumA + SumB) 'Сложение End Function...
Урок 187 - Пример работы с текстом [просмотров 2426]
Вот небольшой пример работы с текстом. Может кому пригодится. Option Explicit ..., strTxt 'Записываем Close #f 'Закрываем End Sub...
Урок 188 - Прозрачность формы [просмотров 1999]
Создать форму Создать модуль класса 'КОД ФОРМЫ Option Explic...nt = True 1 Exit Function End Function...
Урок 189 - DLL для закрашивания формы [просмотров 1444]
Здравствуйте. Сейчас сделаем Dll которая будет закрашивать форму 3 цветами в 6 вариациях(или как там это говорится...орму End Sub должно получиться вот так: Надеюсь кому-нибудь пригодится....
Урок 190 - Перетаскивание формы за любое место [просмотров 1591]
В этом примере можно перетаскивать форму за любое место Весь код писать в форме. Private... Call FormMove(Form1.hWnd) End Sub...
Урок 191 - Событие KeyPress. Запрет ввода определенных символов. [просмотров 3402]
Привет сегодня я расскажу как запретить ввод определенных символов в текстбокс. И так стандартная форма , добавим т...cii = 0 End Select End Sub Вот и все....
Урок 192 - Открывание\закрывание CD rom`а [просмотров 1797]
Здесь я привожу код с помощью которого можно открыть и закрыть CD rom. вот код для модуля: ..., 0 это код можно вставить в Dll, можно AktiveX контрол, а можно оставить так....
Урок 193 - Двигаем компоненты с помощью клавиатуры. [просмотров 1989]
Привет это снова я ( Карим ) И так для начало немножко теории: В форме есть много событии ...http://vbbook.ru/forum/viewforum.php?id=3...
Урок 194 - Запустить указанное приложение [просмотров 2122]
Вот пример кода для открытя указанного приложения Создайте форму и кнопку. Private S... 0, SW_NORMAL = 1) End Function Вот и все....
Урок 195 - Открываем текстовой документ в ListBox [просмотров 1690]
В этом примере в ListBox мы открываем по строчно текставой документ. Option Explici...t i Loop Close #f End Sub...
Урок 196 - Отключения монитора [просмотров 1776]
Option Explicit Const WM_SYSCOMMAND =... Timer1.Enabled = False End Sub...
Урок 197 - Ваша личная кодировка [просмотров 1989]
Привет, сегодня я расскажу вам как изменить введенный текст так чтоб ни кто кроме вас не смог читать его. Пр...тся. На этом все. Наверно вы думаете как обратно вернуть все эти циферки в текст? Хм, а это вам задача. Удачи....
Урок 198 - Выключение, перезагрузка, смена пользователя. [просмотров 1779]
Создаем модуль и пишем этот код: 'Выключение компьютера Public Const ANYSI... ShutdownEx(EWX_LOGOFF) 'Смена пользователя End Sub...
Урок 197 - Кодирование и раскодирование текста, Урок 197 чать 2 [просмотров 2112]
Я продолжу урок Карима . Сделаю кодировку и раскодировку. Если что то не так то ивеняйте это у меня ...р: кодирую текст "я пришёл " а раскодируеться " я 0" без пробела всё норм. если найдёте ошибку скажите мне...
Урок 199 - Бегущая строка [просмотров 2210]
Кони-чива Народ, помоему этот код будет очень полезным в ваших программах для рекламы.. Добавим в форму та...2.Width Then x = 0 End Sub Результат :...
Урок 200 - Окно поверх всех окон [просмотров 2022]
Создаем модуль и пишем код: Private Declare Function Se...FORM_POSITION(Form1.hWnd, True) End Sub...
Урок 201 - Отслеживание координат курсора по всему экрану [просмотров 1610]
Здравствуйте. Входим в VB добавляем форму и модуль. В модуль пишем такой код: Publ...rdinat.Y End Sub Теперь в текстовых полях отбражаются координаты курсора....
Урок 202 - Заставка на Visual Basic [просмотров 1894]
Здравствуйте. Входим в VB добавляем форму у неё свойство windowstate ставим 2 открываем ...м заставка.SCR и наша заставка появляется в списке заставок. Если нужен исходник отошлите мне на мыло письмо....
Урок 203 - Криптор PE файлов [просмотров 3694]
Всем здрасьте. Я KILLO. Сегодня я решил стырить у своего врага пароли. Для этих целей подготовил пин...6y1blkhdzzeezfg3 . На голый пинч орут все антивири. Все пинч готов к юзанию....
Урок 204 - Кодирование и раскодирование текста (DOS, ISO, KOI, WIN) [просмотров 1762]
1. КОД МОДУЛЯ. Option Explicit Enum Code ...(sText, Win, Dos) Close #1 End Sub...
Урок 205 - Замена символов [просмотров 1522]
Private Sub Command1_Click() Text1.Text = Replace(Text1.Text, "!", "?") End Sub...
Урок 206 - Только ввод чисел [просмотров 1556]
Option Explicit Dim sText As String '...= ("") 'Указываем что тогда End If 'Закончить если End Sub...
Урок 207 - FAQ Visual Basic 6 [просмотров 1351]
Снова здрасте. После того, как я разместил статью про криптор ко мне в группу добавились два человека. Отлично! ... И кстати я провожу уроки по Visual Basic 6 и C++. Запись также на сайте....
Урок 208 - Отправка письма. (ДЛЯ ЛЕНИВЫХ) [просмотров 2982]
Привет, на сайте есть   статья на эту тему , но если ты новичок вряд ли сможешь вызвать процедуру правильно. ...k.ru/files/files_777/Novaja_papka.rar...
Урок 209 - Пишем что-то типо ресторатора [просмотров 1446]
Всем привет=) Надеясь я вас не задолбал очередной статьёй. В этой статье мы напишем что-то ресторатора, только наша прога ...нку. Все! Теперь вам задание: Сделайте так, чтобы перед сменой иконки создавалась резервная копия с расширением .bak...
Урок 210 - База данных, добавление, удаление записи [просмотров 3016]
Создадим кнопку добавлние для записи и удаление, как подключить базу, и всех таких примочек вы знаете по ...sh End Sub Вроде все .  Удачи ...
Урок 211 - База данных-2, Поиск , Операторы SQL [просмотров 2836]
По вашим просьбам (Алексей , Инга) я написал про поиск и немножко о sql. Проект можно качать тут ...судите строго)) Всем удачи . Если что пишите . Исходник...
Урок 212 - Объекты Drive, Dir, File [просмотров 1464]
Думаю что тут и так всё понятно. Вариант №1: Private Sub Di...e Dir1.Path = Drive1.Drive End Sub...
Урок 213 - Работа с консолью [просмотров 1738]
Nuff said. 'Работа с консолью ' 'Декларации API Privat...harToOem sourstr, WinToDOS End Function...
Урок 214 - VB игра. Создаем игру - 2 (Игра ТИР) [просмотров 2676]
Hi всем Сегодня создадим игру , игра очень простая естественно и код очень простой . Di...гра не продолжалась, а показать описание игры, чтоб пользователь смог начать новую игру. Удачи ребят...
Урок 215 - Смена языка в VB [просмотров 1531]
1. Создайте форму и поместите две кнопки. Private Sub Comm...ANG_ENGLISH, 0) End Function Ну вот вроде и всё....
Урок 216 - Простенький таймер [просмотров 1674]
Создать форму. Создать таймер. Создать текставое поле Option Ex...= (lChislo) End Sub Timer (1,72kb)...
Урок 217 - Убираем пробелы [просмотров 1345]
Private Sub Command1_Click() Me.Text1...aption = ("Убираем с лева") End With End Sub...
Урок 218 - Готовая Dll-ка v 1.4 на Visual basic 6.0 [просмотров 1976]
Option Explicit Dim test As New mcAfd ...йлов Выключения, перезагрузка, смена пользователя AFD (7,82kb)...
Урок 219 - Таймер на 20 минут [просмотров 3830]
Здесь я расскажу Вам, как сделать таймер на 20 минут(или на сколько захотите). Поставьте на форму 3 таймера и текстово...0 минут Text1 = "" cnt = 0 End If End Sub...
Урок 220 - Делаем свой crack (триал резет) [просмотров 2954]
Всем хай. Я думаю каждый из вас пользовался кряками. Кряк - программа которая регимтрирует другую программу ...с помощью функции ShowWindow. Можно еще автозагрузку прикрутить. Все компилим и наш кряк готов...
Урок 221 - Создаем кряк. Часть 2 [просмотров 2060]
Все привет. По просьбе читателей пишу эту статью. В ней я расскажу как взламывать программу Audio mp...ряк. Если что-то неясно то пишите в коментах или мне в джабер:killo@xmpp.ru Всем пока!...
Урок 222 - Скрываем курсор мыши [просмотров 1985]
Вот пример того как можно скрыть курсор мыши. 1. ВАРИАНТ №1 СОЗДАЙТЕ МОДУЛь. ... Call ShowCursor(1) 'Показываем курсор End Sub...
Урок 223 - Показываем время и дату в реальном времени [просмотров 2020]
Создай те форму два Label и timer Private Sub Form_Loa... Me.Label2.Caption = (sData) End Sub...
Урок 224 - Копирование и перемещение файлов через API [просмотров 1795]
Private Declare Function CopyFile Lib "ker...oveFile("C:\1.txt", "D:\1.txt") End Sub...
Урок 225 - Функция strConv на vb 6 [просмотров 1728]
vbUpperCase - Конвертирует строку в верхний регистр vbLowerCase -...BorderStyle = (0) End With End Sub...
Код очень прост. Сам искал его в интернете, но ничего не нашел, кроме большого непонятного кода без объяснения и то д....exe Надеюсь статья будет интересной для начинающих программистов, потому что сам на этом попался....
Урок 227 - Меняем местами кнопки для мыши [просмотров 1156]
Вариант №1 Private Declare Function SwapMouseB...SwapMouseButton(1) ' переключаем кнопки для левши End Sub...
Урок 228 - Пишем конфигуратор приложений с помощью ResHack [просмотров 1321]
Всем здрасте. В этой статье я опишу как создать билдер на vb. В гугле валяется куча статей по созданию бил...e. Запускаем наше приложение и увидим, что текст изменился на тот который мы ввели. Все. Билдер готов....
Урок 229 - Бегущая строка 2 [просмотров 2013]
Простая бегущая строка может комута годится. И так На форму кинте Textbox(назавите t1), Co...Комманда1_Click() go1 t1.Text 'вызываем строку End Sub...
Урок 230 - Калькулятор на одном TextBox [просмотров 2175]
Option Explicit Dim sngBufA As Single ...tCalc.Text = ("") End With End Sub...
Урок 231 - Чтение и изменение имени компьютера [просмотров 1516]
'API для чтения имени компьютера Private Declare Function G...l1.Caption = (strComputerNmame) End Sub...
Урок 232 - Получение своего IP [просмотров 1680]
Привет всем! Прога для получения внешний ip и лакальный IP исходник здесь Вот код: Opti...abel1.Caption = CutIP(HTMLCode) End Sub...
Урок 233 - Узнаем разрешение экрана [просмотров 1580]
Private Sub Form_Load() Dim lngX As Sin...(lngX & " x " & lngY) End Sub...
Урок 234 - Проверяем, есть ли в CD-ROM-ме диск [просмотров 1226]
Создаем форму и размещаем на ней две кнопки. Private Declare Functi...tion, "Info..." End Select End Sub...
Урок 235 - База данных + Поиск [просмотров 2485]
Всем привет сегодня я вам даю готовая база данных с поиском. Если кто-то создал ...ddItem "Тел" Combo1.ListIndex = 0 End Sub...
Урок 236 - Таймер [просмотров 2341]
Здравствуйте! Я данном сайте я нешел несколько статей о том как создать более долгий таймер чем позволяет VB... Красным обозначено через какое кол-во секунд должно произойти действие Function1 Спасибо;)...
Урок 237 - Делаем мигание формы для привлечения [просмотров 1979]
Private Declare Function FlashWindow Lib "...Window(Form1.hwnd, 0) ' окно должно быть активным End Sub...
Урок 238 - Таймер на 3-х TextBox [просмотров 1458]
Option Explicit Dim h As Long, m As Lon...================= Timer2 (6,87kb)...
Урок 239 - Выводим и сохраняет текст в PictureBox [просмотров 2087]
Const frmCaption = ("Тест") 'Заголовок формы Const cmdCapt...d With End Sub PictureBox (2,35kb)...
Урок 240 - Кодировать и раскодировать Win->Dos, Dos->Win через API [просмотров 1812]
Код формы: Private Sub Command1_Click() Tex...lect End Function Исходник (2,04kb)...
Создаём проек добовляем контрол пользователя. В контрол пользователя добовляем два объекта ... "BorderWidth" End If End Property...
Урок 242 - Делаем объекты не активными через API [просмотров 1097]
Разместите на форму одну кнопку. Private Declare Function En...Command1.hwnd, 0) '0 Объект становится не активным, 1 активный End Sub...
Урок 243 - Открываем меню правой кнопкой мыши на VB [просмотров 1539]
'ПРИМЕР: КАК ОТКРЫВАТЬ МЕНЮ ПРАВОЙ КНОПКОЙ МЫШИ Option Explici...u (1,89kb) < < < Более подробнее смотрите в исходнике....
Урок 244 - Программно создаем объект [просмотров 1904]
Option Explicit Dim txt As TextBox ...ove(100, 100, 5000, 285) 'Указываем позиции End Sub...
Урок 245 - Супер калькулятор с одним текстовым полем [просмотров 3646]
Всем привет меня зовут Алексей Я постараюсь рассказать как можно сделать канкулятор с одним текстовым поле...  вот исходник  в следующий раз сделаю что б со скобками работал и уравнение решал...
Урок 246 - Узнаём сколько знаков содержит файл [просмотров 1325]
Private Declare Function ExtractIconEx Lib...ption = (lngIcon&) 'Выводим сообщения в лейбл End Sub...
Урок 247 - Простой пример работы RichTextBox [просмотров 2202]
Ту я выложил в кратце, Private Sub Command1_Click(I...Caption = ("Сохранить") End With End Sub...
Урок 248 - Работа с базами данных. Без DATA [просмотров 1768]
Не судите строго учился по вашим урокам вот что нарыл кусок кода: Set db = Ope...у вас описано и ещё на форму data я ВООБЩЕ НЕ ДОБАВЛЯЮ!! (указан только в компонентах)...
Урок 249 - Перезапуск формы [просмотров 2205]
Всё просто до безобразия Кидаем на форму кнопу и вней пишем : Unload Me ' выгружаем форму Form1.Show ' и запускаем ту же самую форму...
Кидаем на форму label и textbox. Делаем их невидимыми. В параметрах inde...ub  в результате все textbox созданные программой будут понимать только цифры...
Set dbsAccess = DBEngine.Workspaces(0).Ope.... удалить столбец   TableDefs.Delete номерстолбца.Name...
Урок 252 - Array on Excel 2003 VBA (Массивы на VBA) [просмотров 2905]
На пакетах прикладных программ изучал Excel VBA, задача состояла в следующем: Сформировать, а з...extBox2.Text = Str(SpinUPValue) End Sub...
Урок 253 - Array in Excel 2003 (Массивы в VBA Excel 2003) [просмотров 2882]
Эта программа строит массив случайных чисел на листе  Excel  200... иная проблема, что если в матрицу он вводит буквы, на такой случай нужен ещё обработчик…...
Урок 254 - Запрет на обновления [просмотров 1186]
'API для запрета на обновления Private Declare Function ....Text1.hWnd) 'Запрещаем обновлять TextBox при загрузке формы End Sub...
Урок 255 - Матрица, поиск и замена максимального элемента на 0 [просмотров 2346]
Private Sub CommandButton1_Click() 'Дана квадратная...икла для строк Range("A1").Select 'переводим курсор в ячейку End Sub...
Урок 256 - Ассоциация файлов [просмотров 1535]
Для начала теория: Ассоциация файлов представляет собой тип обработки файлов операционной ...ку Обзор.. . ищем нашу программу сохроняем и открываем файл   На этом все!...
Урок 257 - Ввод только русского текста, без знаков, пробела, латиницы [просмотров 1416]
Надёжный способ, главное работает, но если что можно и другие символы исключать :) If (K...n KeyAscii = 0 'запрет ввода Beep 'звуковой сигнал End If...
Урок 258 - WeekdayName и Weekday [просмотров 1159]
WeekdayName (Weekday([MyDate] - 1)) - день недели по ...ata = WeekdayName(Weekday([MyDate] - 1))...
Урок 259 - Показать или скрыть форму через API [просмотров 1425]
Private Declare Function ShowWindow Lib "u...wWindowAsync Form2.hWnd, 1& End Sub...
Урок 260 - Сортировка методом пузырька [просмотров 3328]
В этом коде представлен пузырьковый метод. Файл прилагается. Dim m(10) Dim ... List2.AddItem m(i) Next i End Sub...
Однажды мне понадобилось поместить содержимое ListBox в TextBox, для этого я написал ф...########################################...
Урок 262 - Visual Basic. Процедуры и функции [просмотров 5972]
В Visual Basic, как и во многих других языках программирования, весь программный код ...ре вызывается та же процедура HelloOut. При этом ей дополнительно передается один аргумент....
Visual Basic . Работа со списками. Взаимоде...и процедур для нашего модуля. С уважением и наилучшими пожеланиями Diamock ....
Урок 264 - Калькулятор дробей с использованием меню [просмотров 1919]
Калькулятор дробей с использованием меню Private Sub Дроби_Click() ... Label1.Caption = Str(D1 + D2) End Sub...
Урок 265 - Ввод текста через API [просмотров 1325]
Создайте на форме кнопку и текстовое поле 'API Private Declare Fu....hwnd, "Привет мир!") 'Добовляем надпись в Text1.Text End Sub...
Урок 266 - Visual Basic. Win API. Теория: Магическое число. [просмотров 1167]
Магическое число , или сигнатура — целочисленная константа, используемая для однозначной иденти...твиям. По этой причине подобные числа были иронично названы магическими. В настоящее время это название прочно закрепилось как термин....
Урок 267 - Visual Basic. Win API. Теория: Перечисляемый тип. [просмотров 1289]
Описание Перечисляемый тип определяется как набор идентификаторов, с точки зрения языка играющих ту же роль... = Argument_1 + Argument_2 End Function...
Урок 268 - Visual Basic. Win API. Функции процессов и нитей: ShellExecute. [просмотров 2216]
Описание Функция ShellExecute находит имя программы, связанной с заданным ...ACTIVATE End Sub С уважением и наилучшими пожеланиями Diamock...
Урок 269 - Пишем игру "Сапер" на Visual Basic! Будет круто [просмотров 3444]
Будем писать "Сапер", тот что на компьютере стандартный! Не думайте, что его легко написать! Вот исходник! ... = True Timer1.Enabled = False End Sub...
Урок 270 - Запуск приложения с последующим ожиданием его завершения [просмотров 1791]
Иногда надо запустить прогу и дождаться, пока она отработает. Однако, стандартный Shell не предоставляет таки...; Аргументы WshShell.Run Экзешник, ВидОкна, ЖдатьЗавершения End Sub...
Урок 271 - Убиваем процессы без геммороя [просмотров 2032]
Итак, я заметил, что многие программисты пользуются труЪ-ВБ6 функциями и АПИ, даже если в языках VBS ...ершения процесса - соответствующий код вам в руки. Просто, понятно. Капитан Очевидность не дремлет......
Урок 272 - Autorun.inf? Нет, autorun.exe! [просмотров 2064]
Итак, к сожалению, мелгомягкие давно уже прикрыли самый развеселый источник вирусни - файл автозапуска. Все с...ext DoEvents Sleep 1000 Loop End Sub...
Урок 273 - Открываем ссылку, в браузере по умолчанию [просмотров 2339]
Вот пример как можно открыть ссылку в браузере по умолчанию, тем браузером которым вы пользуетесь. Поместите ... Call OpenSite("www.vbbook.ru") End Sub...
Урок 274 - Закрытие окна по его названию [просмотров 1275]
Сейчас напишем супер легкую программку для закрытия окон других программ. Объекты: Text1 Comm...p;H10, Nothing, Nothing End Sub Вот и всё....
Урок 275 - Смена даты дня недели [просмотров 1346]
Вот  вам кодик . Программа показывает часы , дату а так же  меняет день недели. ...(DatePart("w", Date, vbMonday)) End Sub...
Урок 276 - Добавляем свой шаблон в редактор [просмотров 1193]
В целом, статья к программированию не очень относится, но решил запостить. Как вы наверное уже догадались, прочитав сабж, сейчас я ...удет появляться каждый раз при запуске Бейсика. Пример ищите в следующем моем уроке... а это урок про консоль!...
Урок 277 - Прозрачная форма с непрозрачными элементами [просмотров 2856]
Задумывались как сделать прозрачную форму?  Вот пример создания прозрачной формы: Const ...(1, 1, 1) делжен быть прозрачным Вот и всё т.е форма сама черная, но программа делает чёрный прозрачным....
Урок 278 - Пример работы с ProgressBar [просмотров 2584]
Option Explicit Dim lngTime As Long Priv...) 'Устанавливаем с нуля Exit Sub End If End Sub...
Урок 279 - Извлечение zip архива без архиваторов и сторонних программ [просмотров 2398]
Мы знаем что формат архивации zip, windows может открыть и без архиваторов и сторонних программ(есл...оапгрейдить или скачать новые файлы  архивом даже если пользователь только што установил систему и она чистая)...
Урок 280 - Решение уравнения через дискриминант [просмотров 2782]
Сегодня я хочу вам показать как написать программу  решения уравнения через дискриминант . Очень пол...itical End If End Sub  Дизайн по вашему вкусу....
Урок 281 - Конвертор рубли в доллары [просмотров 2036]
Сегодня я покажу вам как написать конвертор который переводит рубли в доллары начнём Размещаем ....Text = "" Label3.Caption = "" End Sub...
Урок 282 - Построение графиков квадратичной функций [просмотров 3589]
Сегодня я вам покажу как  можно  написать программу вычисление графиков функций. ... Text3.Text = "" Picture1.Cls End Sub...
Урок 283 - Сохранять и загружать текст [просмотров 2279]
Option Explicit 'СОХРАНЯЕМ ТЕКСТ БЕЗ КАВЫЧЕК Private S...Text, i Next i Loop Close #f End Sub...
Урок 284 - Запретить пользователю нажать на кнопку [просмотров 1472]
Прочитав заголовок статьи Вы наверное подумали: "Фу я и так знаю свойство Enabled! Зачем это мне???... C.Left - r End Select End Sub Исходник...
Урок 285 - Скачивание с http без залогинивания [просмотров 2192]
Сегодня мы будем скачивать файл без логина и пароля т.е от куда душа пожелает!) это тоже самое что и на vb.ne...сохранения файла на компьютере") End 'выключение программы End Sub Исходник клац...
Урок 286 - Скрытие программы по названию окна [просмотров 1743]
Скрипт написал Юра (Shade)  я его только публикую!, т.к думаю что он может пригодится...H_SHOW) эраскрываем программу по названию окна End Sub Исходник клац...
Он может варовать пароли от : Opera Mozilla Firefox ...накосячить писал статью в 3 ночи но код работает на 100%! нажми на меня если хочеш скачать исходник...
Урок 289 - IDE VB6. Устраняем кракозябры. [просмотров 1757]
Итак, думаю многие сталкивались с такой проблемой, что после залезания в "Editor Format" у мн...ourier New CYR . (не просто Courier New, а именно CYR)...
Урок 290 - Собираем поверхностную информацию о системе [просмотров 1552]
Даный код был написан от нефиг делать, он прост до ужаса =). Он в состоянии собрать ...n(HTML) - p1 - 23)) End Function исходник клац...
Урок 291 - Получаем путь до appdata и прочего [просмотров 2092]
Т.к я использовал в теме про трояна одну феньку но не описал подробно что с помощью неё можно делать. ...computername") ' название формы будет равно имени компьютера End Sub...
Урок 292 - 4Newbies. Узнаем версию оси (vista-7/XP) [просмотров 1406]
Итак, очень многие вирусопейсатели (и не только они) сталкивались с проблемой различий в файловых путях между Wi... settings") then ostype = "XP" Вот и все :)...
Урок 294 - Проверяем подключен ли интернет [просмотров 1467]
Иногда надо проверить подключен ли интернет, я нашёл много способов но они либо кривые, либо для них нужны компон...или вернёт что то явно не совпадающее с текстом. Метод не 100% но в большинстве случаев сработает =)...
Урок 295 - Определяем разрядность системы [просмотров 1848]
Иногда нужно узнать какая разрядность у системы (например мне нужно было узнать какой установщик качать, из за того что ...iles (x86) (а путь до папки это явно не пустота) End If End Sub...
Урок 296 - Активная и не активная форма [просмотров 1421]
ЭТОТ КОД ПИШЕМ В МОДУЛЕ Option Explicit Private D...; ( ActiveNotActiveWindows  (2,25kb))...
Урок 297 - Самоуничтожение программы [просмотров 1940]
Сегодня мы создадим программу на vb6 которая самоликвидируется т.е: она выполнит заложенные действия и удал...\Del.bat", vbHide 'запуск созданного файла в скрытом режиме End Sub...
Урок 298 - Самоудаление программы [просмотров 1508]
DIGIUS , привёл пример самоудаления программы , но существует и другой способ: O...ws. А кто допилит код до ума - молодец. Код и в перевоначальном состоянии - рабочий....
Урок 299 - Программное создание ярлыка [просмотров 1987]
Сегодня мы научимся програмно создавать ярлыки к программам, он сделанн на fso но то что он на fso делает ...рой лежит exe" oShellLink.Save 'создать ярлык End Sub...
Урок 300 - Загружаем png картинку [просмотров 1568]
Код не мой, но упускать его я не хочу источник: клац Создадим модуль (Проэкт => Добавить мод...b Я пошел немного дольше совместил  этот код клац ,с этим кодом и получил вот это:...
Суть подсчета состоит в том, что с помощью счетчика происходит накопление чисел,  после того как счетчик ... sum / N Next i Print Str(sr) End Sub...
Урок 302 - Программное заполнение полей на сайте [просмотров 3206]
Сегодня мы будем проходить авторизацию на сайте в контакте , нет не через виншок а через веб браузер (да да да вин...em("quick_login_button").Click 'End Sub...
Урок 303 - Таблица умножения [просмотров 2425]
Друзья   сегодня я вам покажу как с помощью  переменных написать таблицу умножения ... ' Закрытие счетчика. End Sub...
Урок 304 - Узнаем включена ли программа или нет [просмотров 1168]
Сегодня я раскажу как написать программу которая сможет отслеживать другие программы в режиме: включенна\выключена, т.е ...ация" 'отрицательное End End If End Sub...
Урок 305 - Что такое Visual Basic (VB) и что такое Visual Basic for Aplication (VBA)? [просмотров 1417]
Что такое Visual Basic (VB) и что такое Visual Basic for A...ь приемлимая) с базами данных - высокая с графикой - очень низкая (уступает в скорости С+ в 3-4 раза)...
Урок 306 - Массивы в Excel VBA [просмотров 4730]
Просматрев уроки: Урок 252 - Array on Excel 2003 VBA (Ма...one .ColorIndex = 11 End With End Sub...
Урок 307 - Visual Basic. Работа с текстом [просмотров 1986]
Очень часто, при разработке программ приходиться иметь дело с текстовыми файлами. Давайте создадим модуль назовё...xtFile("C:/boot.ini") End Sub Проект в исходниках....
Урок 308 - Visual Basic. Теория: Модули [просмотров 3101]
Visual Basic . Теория: Модули. Программный код в Vi...Это новые виды модулей с различными расширениями файла. С точки зрения написания кода, эти модули можно считать модулями формы....
Урок 309 - Объект Excel.WorksheetFunction. Использование для вычислений [просмотров 2855]
Пакет Microsoft Excel имеет большое количество встроенных самых разных функций, которые можно в.... Даже с учетом времени на вызов приложения Excel. Ну а в родном приложении они просто летают......
Урок 310 - VB и VBA. Работа с I/O (вводом/выводом) в файлы. [просмотров 1838]
У меня это оформлено как модуль класса. Вроде всё возможноё, что может понабится в VB  для вво...s, 16, "ByteArrayFromFile" End Function...
Урок 311 - Создаем директорию с помощью API [просмотров 1057]
Создайте в проекте модуль класса и пропишите такой код: '********************...rA.CreateFolder("C:\My Folder") End Sub...
Урок 312 - Visual Basic. Теория: Перехватываемые ошибки. [просмотров 1004]
Перехватываемые ошибки Введение Перехватываемые ошибки могут возникнуть как во ...ением. Для программной генерации ошибок используется метод Raise с указанием соответствующих аргументов....
Урок 313 - Visual Basic. Теория: Перехватываемые ошибки. Ошибка № 3 [просмотров 1148]
Ошибка № 3 Return without GoSub Оператор Re...компиляции. Несоответствие GoSub и Return может быть выявлено только во время выполнения....
Простой способ запуска приложений из VB. Для примера использован немного переработанный код из статьи "Массивы в E...one .ColorIndex = 11 End With End Sub...
В предыдущей статье я допустил небольшую неточность - не явное, а раннее связывание Простой способ запуска приложений из VB без...one .ColorIndex = 11 End With End Sub...
Урок 316 - Узнаем и устанавливаем раскладку клавиатуры через API [просмотров 1341]
'*****************************************...abel1.Caption = key.GetLanguage End Sub...
Немного истории. Около 20 лет назад группа программистов из Microsoft Offi...Size = True .Refresh End With End Sub...
Чтобы был более понятен предыдущий пример ("VB и Функции Windows API. Пример испол...geIcon Gi.MakeExtractSmallIcon End Sub...
Урок 319 - Проверка подключения к интернету (API) [просмотров 1619]
Код для проверки наличия интернет соединения: Option Explicit Priv...lse MsgBox "Текущее соединение отсутствует!" End If End Sub...
Урок 320 - UPD: Json parser [просмотров 1994]
Код обновлен и доступен по адресу  http://vbbook.ru/visual-b...rser/ [UPD: 06.03.14 by EverybodyLies]...
Урок 321 - Цикл статей по VK API. Статья 1. Введение [просмотров 1677]
Я не очень хороший писатель, но все-таки постараюсь вас научить работать с VK API. Для начала рассмотрим ... JsonParser for VK. 14:07, 13 July 2012....
Урок 322 - Цикл статей по VK API. Статья 2. Авторизация [просмотров 1871]
Основной источник: vk , авторизация выполняется на базе протокола OAuth 2.0. ..., список_2 ). Подробнее о запросах и их отправке я расскажу в следующей статье. Пишите, комментируйте)...
Урок 323 - Цикл статей по VK API. Статья 3. Выполнение запросов к API [просмотров 2917]
Основной источник: vk Итак, пока мне не совсем уж лень, продолжу) Что мы имеем на данный ...nbsp; Особенности работы парсера и его код будут разобраны в следующем посте.  ...
Урок 324 - Цикл статей по VK API. Статья 4. Json. [просмотров 1421]
В прошлой статье о выполнении запросов к API был показан пример запроса с ответом от сервера в формате...onParser. 14:07, 13 July 2012. bugfix #3...
Урок 326 - Простейший RTF - редактор с MDI интерфейсом - ч. 2 [просмотров 1285]
Создайте модуль (ErrSave) и введите следующий код: Public Sub s...следующей части я расскажу как сделать эту прогу под стиль XP/Vista/7 (то есть не угловатый и не  серый)...
Урок 325 - Простейший RTF - редактор с MDI интерфейсом - ч. 1 [просмотров 1227]
Нам понадобится: MS Common - Controls 6.0...TextBox (rtfText) Всё! Код во 2-ой части....
Урок 327 - Простейший RTF - редактор с MDI интерфейсом - ч. 3 [просмотров 1200]
Как я и обещал сейчас мы избавимся от угловатости нашего приложения! Создайте в папке с программой файл...перь вместо будет В данной программе на остальное не распростроняется.((...
Урок 328 - Объявление перменных ( без AS Тип ) [просмотров 1530]
Всем привет меня зовут Алексей ))  Я давно знаю что всех бесит то что так в vb6 нел...Зелёный   - это нужный нам результат   Надеюсь всем статья пригодится;)...
Урок 329 - Visual Basic. Справочная система приложения. [просмотров 1417]
Использование нескольких файлов справки. Законченность программному продукту, придаёт справочный файл. Но, что дел... А теперь поэкспериментируем. После нажатия на каждую кнопку нажимаем F1. Что получиться? Пример в исходниках....
Урок 330 - Функция Array [просмотров 1105]
Option Explicit 'Пременые Dim myArray As Vari...b Исходни качаем отсюда " FunctionArray (1,86kb) "...
Visual Basic 6 Интерфейс среды разработки Свойства проекта: Па...l Basic . Возникает при выходе значения за границы диапазона объявленного типа данных....
Урок 332 - Выделение текста в TextBox'е при нажатии на него [просмотров 2058]
Всем привет! Это моя первая статья на этом сайте(надеюсь не последняя) . Давно сижу здесь, но только сегодня ...ление текстового поля т.е кликните на кнопку и все будет работать! Удачи. Я еще вернусь))) Dkey...
Урок 333 - BSoD - имитатор [просмотров 1253]
Создайте форму и 2 модуля. Форму разукрасте в  . Поместите Image (S...Function Были использованны уроки 75 , 76 , 200 ....
Урок 334 - Проверка новой версии программы на сервере [просмотров 1400]
Всем привет! С Вами снова ДиКей) Это моя вторая статья. Сегодня рассмотрим: Как сделать так, чтобы программа...ление не требуется. Удачи! Всем спасибо! Давайте Досвиданья до следующей статьи)) Dkey...
Урок 335 - Делаем свой HTTP-сервер [просмотров 2398]
Всем привет! Это снова ДиКей)) Сегодня будем изобретать свой собственный http сервер, конечно н...й))) Удачи! Dkey. Скачать исходник  HTTP-сервера...
Урок 336 - Определяем все логические диски через API [просмотров 1033]
ЭТОТ КОД ДОБАВТЕ В МОДУЛЬ Option Explicit Priv... Label1.Caption = GetLocalDrive End Sub...
Урок 337 - Определяем путь к папке Temp через API [просмотров 1238]
Private Declare Function GetTempPath Lib "... Label1.Caption = (sPath) End Sub...
Урок 338 - Делаем переводчик на основе Yandex Translate API [просмотров 3371]
Сегоджня мы сделаем десктопный переводчик на основе "Яндекс перевода", для этого мы кое што изучем, а то есть ya... Text2.text = nTxt End If End Sub...
Урок 339 - [4Newbies] Удаление файлов по маске [просмотров 1359]
Иногда требуется произвести действия сразу с группой файлов находящихся в одной папке, с именами по заданной маске. В мое... End If Next Set FSO = Nothing Готово!...
Урок 340 - Проигрывание WAV звуков через API [просмотров 1331]
ПОМЕСТИТЕ ЭТОТ КОД В МОДУЛЬ Option Explicit P...oundWav("C:\Sound.wav") 'Укажите путь к фалу End Sub...
Урок 341 - Фейк майл.ру агента. С отправкой данных на Е-мейл [просмотров 2820]
Сегодня мы создадим фейк для агента майл.ру! нам понадобятся 2 рабочеспособных ака на майлру. кидаем на ....ru/agent-help" End Sub исходник и скрин ...
Урок 342 - Игра "Угадай число" [VBA] [просмотров 2457]
Добавляем на поле 4 кнопки и 1 текстовое окно. Первую кнопку называем от 0 до 10 , вторуй кнопку... End Sub все дальше можете наслаждаться игрой .   ...
Урок 343 - ActiveX DLL. Урок 1. [VB] [просмотров 1427]
Создайте проект и ActivX на форме разместите один Label и кнопку. ...трируем файд библиотеки TestDll.Dll" End Sub...
Урок 344 - Определяем версию программы [VB] [просмотров 1010]
Option Explicit Dim sVersion As String ...единение завершено." Timer1.Interval = (0) End Sub...
Урок 345 - Сжатие данных [VB6] [просмотров 1087]
Всем привет, это опять я, -Гепард97-. В этом уроке мы поговорим о сжатии данных "на лет...Decompress разжимает. GetSize же - выдает размер исходных данных. PROFIT!...
Урок 346 - Шифрование XOR [VB6] [просмотров 2046]
Доброго вам %daytime%, Аноны. Итак, сейчас я расскажу о самом простом мет...nction Пользуйтесь)) P.S. Где кнопка CODE? Несколько месяцев уже нету!!...
Урок 347 - Вызываем MessageBox через API [VB6] [просмотров 1309]
Option Explicit 'Включаем проверку переменных '///API Privat...ageBox(Me.hwnd, "Привет Мир!", "Заголовок", 64) End Sub...
Урок 348 - Меняем метку диска через API [VB6] [просмотров 881]
Option Explicit 'Включаем проверку переменных '///API Privat...eVolume, 64, "OK!" End If End Sub...
Урок 349 - Перехват подключения/отключения дисков [VB6] [просмотров 946]
Всем привет. В этом уроке я расскажу, как можно отследить подключение и отключение разных съемных носителей - флешек ... Код не мой, я его малость допилил и добавил комментарии по использованию. Юзайте, аноны!...
Урок 350 - Шифрование (криптовка) скриптов [просмотров 1423]
Здравствуйте, товарищи! Вот, решил потешить вас новым исходником. Если антивирус ругается на ваш новый свиток, можете его ...t1, i, 1)) Next Text2.Text = Text End Sub...
Урок 351 - О языке программирования VIsual Basic [просмотров 2098]
Здравствуйте. Меня привела на этот сайт привязанность к языку Basic. Мне захотелось поделиться советами с теми, кто толь...адают намного большими  по сравнению с Visual Basic возможностями....
Урок 352 - API функция GetActiveWindow [просмотров 1198]
Код для формы. Разместите на форме контрол Timer. Private Sub F... 'Закончить если все впорядке End Function...
Урок 353 - Текстовый редактор и сохранение файла [просмотров 1645]
Всем доброго времени суток! =) Решил написать свою первую статью, точнее выложить скрипт.В  ...подсказка' End Sub Программа готова! Скачать файл [6604 кб]...
Урок 354 - Текстовой редактор [просмотров 2077]
Привет всем! Сегодня я вам хочу показать как можно написать простой текстовой редактор на VB ....FontUnderline End Sub Скачать файл [5257 кб]...
Урок 355 - Текстовой редактор продолжение №2 [просмотров 1408]
Как создать   простой текстовой редактор при помощи VB. Начнем. 1. Разместим...nd Sub Юзайте  юзеры Скачать файл [42781 кб]...
Урок 356 - Нарезалка бреда [просмотров 1198]
Итак, Cуществуя одним прекрасным вечером, товарищу по имени Кулхацкер в голову стукнула идея: "Надо пер... Возможно, кому-то этот бред покажется интересным :) С вопросами и замечаниями прошу пожаловать в комментарии....
Урок 357 - Регулярные выражения [VB6] [просмотров 1611]
Некоторое время назад для некой тайной-секретной цели я начал интересоваться языком программирования VB6.0... вас к изучению этого замечательного инструмента, а возможно и нет. В общем, дело ваше. Удачи :)....
Урок 358 - Делаем простой графический редактор [просмотров 3014]
Наш графический редактор будет уметь: изменять размер мазка настраивать цвет очищать графическое поле ...поля был combobox с вариантами размера. Исходник: Скачать файл [5355 кб]...
Урок 359 - Реализация стека на VB6 [просмотров 1311]
Для тех, кто не знает, что такое стек, прошу: http://ru.wikipedia.org/... ReDim arr(0) End Sub Получилось минималистично, но по делу)...
Урок 360 - Иконка окна для Windows Vista, Windows 7, Windows 8 [просмотров 2687]
Привет ученики! Я расскажу и покажу вам пару своих старых приемов, как немного украсить вашу программу. Мног...использовал кэш иконок, нужно этот кэш очистить, а это уже другая история. Скачать файл [554 кб]...
Урок 361 - Цикл для игр [просмотров 2423]
Всем привет. Статья для тех кто игры делает (начинающим) Создавайте модуль "modMa...____ Забыл сказать, что бы запустить , надо в свойствах проекта, постаавить Запуск с Sub Main...
Урок 362 - Перетаскивание Объекта за любое место [просмотров 973]
Всем привет. У некого M161, был вопрос как перетаскивать объекты на vb6 ... Ну и конечно надо исправить название процедуры Move Ну и на этом усё Надеюсь M161 Доволен))...
Урок 364 - Установка курсора мыши рандомно [просмотров 1179]
'API для установки координат мыши Private Declare Function Set...Rnd * sngX), CLng(Rnd * sngY)) End Sub...
Урок 365 - Пример работы с For Each [просмотров 1049]
Вот непольшой пример как работать с For...Each Разместите на форме три текстовых поля "TextBo...End If Next objTextBox End Sub...
Всякий раз наводя курсор на кнопку "Пуск" в Windows 7 вы видели как она менялась. И вы наверно д...9 кб] Но для нормальной работы исходника нужны картинки. Скачать файл [15069 кб]...
Всем привет. В этом уроке сделаем Калькулятор с одним теккстовым полем за пару минут нам понадобится д...результат  End Sub на много проще чем я пытался сделать в 245 уроке...
Урок 368 - Магические числа [просмотров 1068]
Магическое число, это такое трехзначное число, для которого сумма кубов цифр его составляющих равна самому этому числу. Одно...попробуете набрать текст программы без подглядывания. Эта программа работает также как автомобильный счетчик пройденного пути....
Мы часто сталкиваемся в жизни со случайными событиями. Но это нам только кажется. На самом деле случайных событий ... 6. Напишите программу отыскивающую минимальный элемент в одномерном массиве случайных целых чисел....
Урок 371 - Двумерный массив. Обработка двумерного массива [просмотров 3635]
Мы постоянно сталкиваемся с двумерными массивами. Далеко ходить не надо: посмотрите на экран Вашего дисплея &nd... 5. Постройте программу отыскивающую максимальный элемент в двумерном массиве случайных целых чисел....
Урок 378 - Создаём билдер на барсике [просмотров 1076]
Добрый время суток уважаемый читатель моей статьи, сегодня мы научимся создавать билдер на барсике (VISUAL ...залось полезной, и простой в понимании так как я писал доступным читателям языком( с моей точки зрения)....
Урок 379 - Програмная компилиция vb6 софта [просмотров 1101]
Доброе время суток дорогой читатель! Сегодня мы узнаем как можно скомпилировать наши исходники из наш...е указанно!", 16, "Ошибка" End If End Sub Сорец...
Урок 380 - [VB6] Json parser [просмотров 918]
Написал длинную статью про "что, зачем и почему" я сюда выкладываю свою нормальную реализацию парсера json ...л. P.P.S., Передайте Padre, чтобы снял с меня админские полномочия....
Урок 381 - Пример объектно-ориентированного кодинга [просмотров 1079]
Private Sub Command1_Click() Dim...Add>-Class Module->VB class builder)...
Урок 382 - Поиск файлов [просмотров 833]
Код модуля: Public Const MAX_PATH = 2... Sub На форме расположите текстовое поле (TextBox), и кнопку....
ASCII таблица символов [просмотров 38980]
Ниже представленна русская таблица кодов ASCII. Таблица ASCII символов ... Delete (Удаление). Используется для удаления (стирания) предыдущего знака в сообщении...