Visual Basic: новости сайтов, советы, примеры кодов.
Выпуск 68.


VBNet VBMania
Голосование:

Нет тем!

Рассылки Subscribe.Ru
Мир программирования на Visual BASIC 5.0 и HTML.


Рассылки Subscribe.Ru
Старые игры

Доска почёта:

Sergey Y. Tkachev
Кононенко Роман
Kirill
Sergey Sapozhnikov
Sobic

Ссылки:

  • Улицы VB
  • Использование VB
  • Азбука VB
  • Улицы VB
  • Кирпичики VB
  • CообЧа VB
  • VB по русски
  • Snoozex Design
  • IgorykSoft
  • Господа!!! читайте MSDN!!!

    Несколько слов от автора:

       Новый 68-ой выпуск рассылки!!!
    Читайте!


    Содержание выпуска




    Книги

    Переход на VB .NET. Стратегии, концепции, код (цена ~ 158 руб.)

    Эта книга была задумана как одна из первых книг о.NET, которая ознакомит читателя с основными идеями новой архитектуры и подготовит его к знакомству с более детальной литературой, например документацией Microsoft и ее толкованиями, которая неизбежно появится на рынке. Она поможет вам взглянуть на эту технологию с позиций ваших собственных рабочих планов и быстро освоить те концепции, которые покажутся необычными для большинства прогр...

    Автор(ы): Дан Эпплман, Издательство: Питер, 2002 г.


    Программирование на VB.NET. Учебный курс (цена ~ 119 руб.)

    Эта книга является вводным курсом по изучению языка программирования Visual Basic .NET. Даны основные принципы объектно-ориентированного программирования в контексте языка VB .NET, поскольку без хорошей подготовки в этой области невозможно в полной мере пользоваться всеми преимуществами VB .NET.
    Изложены азы всех аспектов языка, которыми должен владеть любой профессиональный разработчик VB .NET

    Автор(ы): Г. Корнелл, Дж. Моррисон, Издательство: Питер, 2002 г.


    VB.NET для разработчиков (цена ~ 125 руб.)

    Основная задача книги - быстро ознакомить разработчиков Visual Basic с изменениями в .NET Framework. Программисты, использующие Java, C++, Delphi или другие инструменты разработки приложений и интересующиеся Visual Basic или технологией .NET Framework, также найдут эту книгу полезной. Хотя книга посвящена Visual Basic.NET, ее основная цель - продемонстрировать взаимодействие Visual Basic и ...

    Автор(ы): Кит Франклин, Издательство: Вильямс, 2002 г.




    Остальные книги о VB можно найти
    здесь.

    наверх


    Citycat by Email

       Программа Citycat by Email позволяет работать с сервером Subscribe.ru с помощью электронной почты. Теперь Вам не нужно тратить деньги на работу в online и просматривать мегабайты рекламы для того, чтобы подписаться на нужную рассылку! Вам просто необходимо скачать небольшую базу данных по всем рассылкам каталога с нашего сайта, после чего Вы сможете подписываться и отписываться от рассылок, заказывать архивы прошлых выпусков, выполнять поиск по каталогу рассылок и многое другое.
       Программу Citycat by Email можно бесплатно загрузить с сайта http://sapisoft.h1.ru.

    наверх


    Новости сайта VBNet

    Дата: 23.06.2002 20:33 | Раздел: Примеры кода | Автор: Беляев Данила

    DllView - Пример как посмотреть что внутри DLL либо EXE. В общем все что Вы хотели знать о исполняемом файле, но боялись спросить ;-)... или просто не знали у кого спросить. Пример, честно говоря, потрясающий! Тут тебе и заголовок файла и точка входа и т.д. и т.п.

    Дата: 23.06.2002 04:42 | Раздел: Статьи по VB | Автор: Колесов Андрей

    Basic - этапы большого пути - Еще каких-нибудь несколько лет назад упоминание Basic в качестве языка программирования вызывало лишь снисходительную усмешку у большинства профессиональных разработчиков ПО. Объяснялось это так: "Да, есть такой язык, которым пользуются любители (чтобы не сказать "чайники"). Но ставить "Васик" в один ряд с настоящими средствами программирования - это просто смешно".

    Дата: 21.06.2002 09:32 | Раздел: Примеры кода | Автор: JEDI

    FadeJEDI - Пример на тему затемнения экрана. Запускаешь, а экран плавно начинает гаснуть. Используется библиотека для работы с портами. В общем посмотрите кому нужно.

    Дата: 21.06.2002 04:39 | Раздел: Статьи по VB | Автор: Сурменок Павел

    Комбинаторика и переборные алгоритмы - Вам наверняка встречались такие задачи, в которых нужно найти количество способов, которыми можно расположить некоторые предметы, сделать действие и т.д. Именно такие задачи и решает комбинаторика.

    Дата: 19.06.2002 19:44 | Раздел: Примеры кода | Автор: Шатрыкин Иван

    SysMonitor - Программи следит за работой других программ. Записывает время старта и время окончания работы программ. Очень полезный пример для тех, кто хочет научиться работать с окнами Windows. В примере применяется устаревшая методика, которая, впрочем, работает хорошо.



    Последние 20 тем форума на VBNet.Ru:

    04:22 / 23 июн.  add button to IE's toolbar |  Ответов: 1
    21:56 / 22 июн.  Новое сообщение без темы |  Ответов: 3
    21:44 / 21 июн.  Active X |  Ответов: 0
    15:03 / 21 июн.  Коллекция |  Ответов: 2
    14:32 / 21 июн.  Как получить образ части экрана? |  Ответов: 4
    14:04 / 21 июн.  Вопрос тем, кто знает, что такое DKOI-8... |  Ответов: 1
    13:01 / 21 июн.  VB-прога как Explorer (ПРОБЛЕМА) |  Ответов: 6
    12:57 / 21 июн.  Поиск слов, символов и т. д. |  Ответов: 2
    11:37 / 21 июн.  VB & SNMP |  Ответов: 0
    11:19 / 21 июн.  Книга жалоб и предложений |  Ответов: 5
    10:31 / 21 июн.  Перевод бинарного файла в текстовый |  Ответов: 1
    10:17 / 21 июн.  Передать ссылку на массив |  Ответов: 6
    06:20 / 21 июн.  Как можно отправить е-mail ? |  Ответов: 2
    06:12 / 21 июн.  Помогите, пожалуйста! |  Ответов: 0
    23:26 / 20 июн.  Как сделать PopUp menu? |  Ответов: 3
    14:53 / 20 июн.  Админам |  Ответов: 0
    14:44 / 20 июн.  Проверка |  Ответов: 2
    12:51 / 20 июн.  Элемент итипа Excel... |  Ответов: 1
    00:35 / 20 июн.  Контролы графиков |  Ответов: 1
    23:07 / 19 июн.  Чат |  Ответов: 1


    Последние поступления в Библиотеку кодов:



    наверх


    Новости сайта VBMania

    • 15.04 - В связи с резким увеличением числа вопросов, поступающих на e-mail администрации сайта, было решено не дожидаться открытия форума, и начать отвечать на вопросы прямо на главной странице. Обсуждению последней новости ответы на вопросы не помешают. Вашего совета ждут, на ваш вопрос ответят.
    • 25.01 - Сегодня открылся новый раздел, в котором вы можете найти ссылки на целую кучу книг по тематике VB и около него.
    • 22.01 - 22 января вышел второй номер он-лайн журнала о Visual Basic 'VB Мания'. В нем можно почитать авторские статьи в уже устоявшихся разделах: Технологии, Система, Графика, Профессия, Человечество и Юмор. Так же не обошлось без новшеств: появился новый раздел dotNET и особенно рецензии ActiveX-компонентов. Обязательно заходите.
    • 17.12 - В связи с тем что форум не горел желаением вести себя так, как должен обычный, порядочный форум, мы его прикрыли для проведения разъяснительных мероприятий. Надеемся, что они не затянутся и форум образумится.
    • 06.12 - С сегодняшнего дня все желающие могут добавлять свои новости и статьи в наши архивы.
      Да здраствует открытость!
    • 27.11 - Наконец-то, после долгих дней и бессонных ночей это свершилось! Сайт объявляется открытым! Непременно прочитайте первый номер нашего журнала. Оцените наши дополнительные проекты. И конечно мы ждем ваших откликов в гостевой книге и по почте.
    • 01.12 - Произошло несколько косметических улучшений, касающихся исключительно удобства работы с сайтом. Во-первых, можно видеть количество записей обсуждения новостей на главной странице; а во-вторых чуточку подправились директории.
      Оценяйте!


    наверх


    Новости сайта Азбука VB



    наверх


    Доска объявлений

       Ищу телеработу.

    • Переводы: английский, украинский, русский.
    • Cipper программист.
    • Assembler программист.
    • PIC разработчик
    • композитор
    • Прогрессивные стили
    • 3D анимация
    • GIF анимация
    Антон Лозовский.

    наверх


    Мои программы

    BalloonMessage for MS Agent

       BalloonMessage for Microsoft Agent реализует диалог программы с пользователем, используя при этом технологию Microsoft Agent. OCX реализует три типа диалоговых окон: InputBox, MsgBox и MsgLabels.

    Автор: Шатрыкин Иван. Соавтор: Павел Сурменок.

    наверх

    Вопрос/Ответ

    Здесь Вы можете задать вопрос, или ответить на уже имеющиеся вопросы.

    Вопросы:


    Автор вопроса:
    ALEX

    Ответ ожидается по этому адресу

       Как спрятать программу в SysTray и сделать для не? там иконку?


    Автор вопроса: DedMorozzz

    Ответ ожидается по этому адресу

       У меня есть MDI форма, у которой есть дочерняя форма с расположенным на ней элементом Data. Мне нужно, чтобы при загрузке программы была видна только MDI форма. Но как только я присваиваю программным путем свойству DataBaseName какое-то значение, то дочерняя форма тут же выскакивает на экран. Как от этого избавиться?


    Автор вопроса: виктор

    Ответ ожидается по этому адресу

       Подскажите как остановить таймер,что бы он сработал один раз или два и остановился.


    Автор вопроса: samit

    Ответ ожидается по этому адресу

       Уважаемые программисты, подскажите каким способом лучше всего разбить ботьшой файл на маленькие, размером 1,44 Mb средствами VB 6.0 а затем их же склеить! Спасибо!


    Автор вопроса: samit

    Ответ ожидается по этому адресу

          Нужна помощь! У меня такой вопрос: в моей программе есть форма с настройками и при нажатии кнопки применить происходит следущее:

        Private Sub Command2_Click()
         If Check1.Value = 1 Then cbdend = 1 'открыть вначале работы
         If Check2.Value = 1 Then cbdtim = 1 'открыть в конце работы
          sbdh = Text2.Text 'имя
          sbdm = Text3.Text 'фамилия
         If Check3.Value = 1 Then arcpro = 1 'есть архив
         If Check4.Value = 1 Then arcend = 1 'нет архива
          pathbd = Text1.Text 'путь к файлам
         End Sub

       Вот так формируются переменные на основе моих настроек и как их теперь записать в файл "setup.ini" в дирректории моей программы, а потом считать их оттуда при следующей загрузке программы? Спасибо!


    Автор вопроса: Spart51

    Ответ ожидается по этому адресу

       При записи информации в файл (методом Put) выводится сообщение "Неправильная длина строки" (если объём информации большой). Что делать? (И кто виноват? :)


    Автор вопроса: Сергей

    Ответ ожидается по этому адресу

       Подскажите пожалуйста, можно ли передать ссылку на массив (находящийся в программе) в раярабатываемый мною ActiveX Control, чтобы этот (именно_этот)массив был доступен в любых процедурах внутри Control?


    Автор вопроса: Виталий Венгров

    Ответ ожидается по этому адресу

       Как изменить яркость картинки ?
    В NT добиваюсь результата с помощью API- функций StretchBlt, SetStretchBltMode, GetColorAdjustment, SetColorAdjustment, GetStretchBltMode
    А в Win9x/ME функции GetColorAdjustment, SetColorAdjustment не поддерживаются.
    Кто нибудь знает как обойтись без них?


    Автор вопроса: Andrey

    Ответ ожидается по этому адресу

       Есть программка рассылки почты. Используется MAPI Controls 6.0. В Outlook Express работает идеально. В Outlook 2000 (не Express) некорректно пристегиваются аттачменты. Т.е. в объем сообщения они попадают, у себя в папке "Отправленные" я их открыть могу, а получатель после пересылки, у себя на машине - нет. Протокол соответственно SMTP.
    Если создавать сообщение вручную - все нормально.


    Автор вопроса: Vladimir

    Ответ ожидается по этому адресу

       Как можно с помощью MAPI Controls отправить письмо в формате HTML? Точнее Какой параметр нужен для MAPIMessages?




    Ответы:


    Вопрос:

       В Delphi есть Qreport есть ли что-то подобное в VB?

    Ответ:

    Автор ответа: DedMorozzz

    Да, в VB есть замечательный генератор отчетов Data Report. Для того, чтобы его добавить к проекту, нужно щелкнуть по проекту правой клавишей в окне с его структурой и выбрать Добавить -> Data Report. Еще понядобится Data Environment (добавляется также).


    Вопрос:

       Подскажите, как сделать чтобы на одной вкладке TabStrip была например кнопка, а на другой вкладке TextBox?

    Ответ:

    Автор ответа: Andrey

    Используй лучше Project-Components-Microsoft Tabbed Dialog Control


    Вопрос:

       Подскажите, как сделать чтобы на одной вкладке TabStrip была например кнопка, а на другой вкладке TextBox?

    Ответ:

    Автор ответа: Ted

    Пользуйся Microsoft Tabbed Dialog Control, в нем все проще.


    Вопрос:

       Kак добавить ярлык в деректорию "Создать" в меню Windows.

    Ответ:

    Автор ответа: Андрей Исаков

    CrystalReport. Даже в 5.0. На счет более раггих не знаю...


    Вопрос:

       ПОМОГИТЕ РАЗОБРАТЬСЯ С MSDN !!!
    У меня Visual Basic 6.0 и при попытке вызвать Справку выдает, что надо типа установить MSDN Library. Долго искал всеми расхваливаемый MSDN на CD-дисках и, наконец, купил на 3-х дисках. И что же?!!?! Они друг друга НЕ ВИДЯТ. VB6.0 при попытке установить ему МСДН говорит, что это не тот диск. А запуская Setup с дисков MSDN (даже после полной установке! - это около 2-х гигов), этот "товарищ" к VB не цепляется! Как мне их установить, чтоб в VB нормально справка работатала?!?!?

    Ответ:

    Автор ответа: StarLink (Grodno)

    Попробуй перед установкой MSDN удалить с диска файл hhcolreg.dat (он где-то в \windows\... лежит). Мне помогло.


    Вопрос:

       ПОМОГИТЕ РАЗОБРАТЬСЯ С MSDN !!!
    У меня Visual Basic 6.0 и при попытке вызвать Справку выдает, что надо типа установить MSDN Library. Долго искал всеми расхваливаемый MSDN на CD-дисках и, наконец, купил на 3-х дисках. И что же?!!?! Они друг друга НЕ ВИДЯТ. VB6.0 при попытке установить ему МСДН говорит, что это не тот диск. А запуская Setup с дисков MSDN (даже после полной установке! - это около 2-х гигов), этот "товарищ" к VB не цепляется! Как мне их установить, чтоб в VB нормально справка работатала?!?!?

    Ответ:

    Автор ответа: Андрей Исаков

    Поищи VisualStudio 98. На 6-ти CD.


    Вопрос:

       Как яяделать библеотеку так чтобы я набрав слово например abs. после точки выскочило меню с всеми процедурами и функциями. У меня получается так только когда я делаю Public классу и функции. Но мне не надо что бы это было Public , а только после набратия слова abs.

    Ответ:

    Автор ответа: Василий Шашенок

    Не совсем понял вопрос. Если ты делаешь библиотеку и перечень процедур и функций выскакивал при написании программы с этим модулем, то ничего кроме Public не могу посоветовать. Почему? А зачем в подсказке программисту нужны процедуры и функции, к которым он не может обратиться!


    Вопрос:

       1. Купил мышь со скролингом (колёсико)-swen sww-18. Можно ли с помощью басика обрабатывать событие прокрутка колесика и нажатие на него?
    2. Как выводить компьютер из спящего режима? Хочу сделать будильник.

    Ответ:

    Автор ответа: Duke

    Ну не знаю что на счет прокручивания но клик на него равен нажатию на среднюю клавишу т.е. если у тебя мышь не с колесом а с 3 кнопками то нажатие на колесо равно нажатию на среднею клавишу мыши пример:

    'нужна форма и 1 лабел
    Private Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = vbMiddleButton Then MsgBox "", , ""
    End Sub


    Вопрос:

       Есть два TextBox. В каждом яаписывается какое-либо время. Например:
    TextBox1.text = "01:30:25"
    TextBox2.text = "02:01:30"
    Как вычислить TextBox2.text - TextBox1.text
    Может кто сталкивался с таким, подкиньте код пожалуйста. Бывает ли переменная типа Time (не timer) и каким обраяом проияводятся вычисления со временем?

    Ответ:

    Автор ответа: Vadim

    Воспользуйся функцией TimeValue(string).Она преобразует строку в тип Data. Присвой разницу переменной типа Date.


    Вопрос:

       Где в Инете можно скачать учебник для начинающего програмиста?

    Ответ:

    Автор ответа: Сергей

    Зайди на сайт http://softsware.narod.ru это сайт я недавно открыл и там вразделе "про Visual Basic" найдёшь архивы статей и учебников.


    Вопрос:

       Как на VB 6.0 написать программу для Windows 2000, которая меняла бы рисунок на рабочем столе?

    Ответ:

    Автор ответа: Сергей

    Добавьте на форму 2 CommandButton. Первая кнопка помещает на рабочий стол любой ваш рисунок, вторая - убирает этот рисунок.
      
    Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As String, ByVal fuWinIni As Long) As Long
    Const SPI_SETDESKWALLPAPER = 20

    Private Sub Command1_Click()
    SystemParametersInfo SPI_SETDESKWALLPAPER, 0, "D:\Basic\tmpProj\Load.bmp", True
    'Заменить путь D:\Basic\tmpProj\Load.bmp на нужный вам файл рисунка в формате bmp
    End Sub

    Private Sub Command2_Click()
    SystemParametersInfo SPI_SETDESKWALLPAPER, 0, 0, False
    End Sub


    Вопрос:

       Подскажите код как в VBA на форме поместить ссылку на E-mail или страничку.

    Ответ:

    Автор ответа: Сергей

    Private Declare Function ShellExecute& Lib "shell32.dll" _
    Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal _
    lpOperation As String, ByVal lpFile As String, ByVal _
    lpParameters As String, ByVal lpDirectory As String, _
    ByVal nShowCmd As Long)
    Private Const SW_SHOW = 5
      
    'E-mail
      
    Call ShellExecute(0&, "Open", "mailto:" + softsware@narod.ru + _
         "?Subject=" + "Re: VitalTime", "", "", 1)
      
    'web
      
    Call Navigate(Me, "http://softsware.narod.ru/")


    Вопрос:

       Можно ли програмно вставить сообщение в папку "Исходящие" Outlook Express(не Microsoft Outlook!)? (VB6)

    Ответ:

    Автор ответа: A012@yandex.ru

    Используй Microsoft MAPI Control 6.0
    Он вставляет сообщения в "Исходящие" текущего почтовика по default.


    Вопрос:

       Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл?

    Ответ:

    Автор ответа: Roman Yuakovlev

    ловить и парсить с помощью Command$...


    Вопрос:

       Как можно программу сделать невидимой для Ctrl+Alt+Delete

    Ответ:

    Автор ответа: Виталий Анисимов

    Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
    Private Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long
    Const RSP_SIMPLE_SERVICE = 1
    Const RSP_UNREGISTER_SERVICE = 0
    Public Sub MakeMeService()
    'Чтобы убрать вашу программу из списка Ctrl+Alt+Delete, используйте процедуру MakeMeService:
    Dim pid As Long
    Dim reserv As Long
    pid = GetCurrentProcessId()
    regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)
    End Sub
    'Чтобы показать вашу программу в списке Ctrl+Alt+Delete, используйте процедуру UnMakeMeService:
    Public Sub UnMakeMeService()
    Dim pid As Long
    Dim reserv As Long
    pid = GetCurrentProcessId()
    regserv = RegisterServiceProcess(pid, RSP_UNREGISTER_SERVICE)
    End Sub
    Private Sub Command1_Click()
    MakeMeService
    End Sub
    Private Sub Command2_Click()
    UnMakeMeService
    End Sub
      
    '---------------------------------------------------------------
    'Обязательно
    Private Sub Form_Unload(Cancel As Integer)
    UnMakeMeService
    End Sub
    '---------------------------------------------------------------
      
    Обязательно


    Можете заполнить эту форму, либо отослать вопрос СЮДА

    Форма для добавления нового вопроса в этот раздел. Информация отсылается по E-mail владельцу сайта.
    Текст сообщения:
    Ваше имя
    E-mail для ответа

    наверх


    Выпуск подготовили:

    Сурменок Павел