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


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

Ваш голос отсылается по E-mail владельцу сайта, после чего голоса анализируются и на отдельной странице выводятся результаты.

Subscribe.Ru увеличило максимальный размер рассылки до 100 кб. В связи с этим вопрос:
Какого размера Вы хотели бы получать рассылку?

Менее 20 кб
От 20 до 40 кб
От 40 до 60 кб
От 60 до 80 кб
Выше 80 кб


В какой день (дни) недели Вы хотели бы получать рассылку "Visual Basic: новости сайтов, советы, примеры кодов."?
Понедельник
Вторник
Среда
Четверг
Пятница
Суббота
Воскресение


С какой периодичностью Вы хотели бы получать рассылку "Visual Basic: новости сайтов, советы, примеры кодов."?
Каждый день
2 раза в неделю
Раз в неделю
Раз в две недели
Раз в месяц
Реже



Рассылки 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
  • Господа!!! читайте MSDN!!!

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

       Этот 30 выпуск рассылки можно назвать юбилейным!.
    Читайте!


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




    Книги

    ADO и Visual Basic. Руководство разработчика

       В книге описано использование технологии доступа к данным (ADO) с помощью основного инструмента разработки приложений Microsoft - Visual Basic 6.0.
       Из книги вы узнаете, как можно исследовать источники данных при помощи окна Data View, как создавать формы для ввода и запроса данных, используя связанные элементы управления, и подсоединяться к источникам данных со сложной иерархической структурой средствами Data Environment. Далее вы изучите, как можно, используя Data Report, представлять информацию в форме, подходящей для печати, или как следует исполнять некоторые, наиболее широко распространенные задачи, связанные с обработкой данных, используя ADO внутри кода Visual Basic. В последних главах книги рассмотрены дополнительные операции, используемые в коде, в том числе формирование данных, для создания иерархических наборов записей, применение ADO в сети Internet и даже создание собственных источников данных.
       Чтобы боле полно использовать средства ADO для извлечения информации из различных источников, в приложении к книге вы найдете справочник по языку SQL, в котором обсуждаются основы работы с оператором SQL SELECT.


    Автор: Гандерлой М.
    Издательсвто: Бином
    Год издания: 2001
    Кол-во страниц: 336
    Стоимость: 169 р.
    Формат: 70х100/16
    Переплёт: нет данных

    VBA 2000 самоучитель

       В книге содержится краткий курс по использованию языка и системы VBA для Word и Excel 2000. Книга предназначена для начинающих программировать в среде Windows 95/9S с использованием в качестве базовых таких объектов Word и Excel, как документы, рабочие книги, листы и так далее.
       Материала книги достаточно для создания как простых макросов, помогающих автоматизировать рутинную повторяющуюся работу над документами и электронными таблицами, так и для разработки достаточно сложных приложений, обрабатывающих данные в диалоговых окнах, обеспечивающих пользователя самыми современными интерфейсными средствами.


    Автор: Кузьменко В.Г.
    Издательсвто: Бином
    Год издания: 2000
    Кол-во страниц: 408
    Стоимость: 111,26 р.
    Формат: 70х100/16
    Переплёт: мягкий

    VBA в Office 2000 учебный курс

       В этой книге описывается Visual Basic for Applications — подмножество популярнейшего языка программирования Visual Basic. Изучив ее материал, вы сможете создавать собственные интегрированные приложения, которые используют как объектные модели стандартных приложений MS Office, так и объектные модели ADO и DAO.
       Книга предназначена для всех пользователей MS Office 2000 —независимо от степени их владения программированием.


    Автор: Васильев А., Андреев А.
    Издательсвто: Питер
    Год издания: 2000
    Кол-во страниц: 432
    Стоимость: 102,19 р.
    Формат: 70х100/16
    Переплёт: нет данных

    Visual Basic 6 Desktor экзамен 70-176

       Книги серии "Экзамен — экстерном" представляют собой удобные, сжатые, хорo шо структурированные конспекты для подготовки к сдаче сертификационных экзаменов на звание Microsoft Certified Solution Developer. Книга "Visual Basic 6.0 Desktop. Экзамен— экстерном (экзамен 70-176)" содержит только действительно необходимый материал, типовые вопросы с ответами и пример экзамена. Возможно, некоторые подходы, применяемые автором, покажутся вам не совсем привычными — не удивляйтесь: это не учебник по Visual Basic; организация материала в этой книге призвана максимально облегчить задачу экзаменуемого. Учтите, что в ряде случаев экзаменационные вопросы выходят за рамки тем, отраженных в документации no Visual Basic, а иной раз правильные ответы на них даже входят в противоречие с "официальной" информацией.


    Автор: Макдоналд М.
    Издательсвто: Питер
    Год издания: 2001
    Кол-во страниц: 608
    Стоимость: 130,83 р.
    Формат: 60х90/16
    Переплёт: нет данных

    Visual Basic 6 Distributed (экзамен 70-175)

       Книги серии "Экзамен — экстерном" представляют собой удобные, сжатые, хорошо структурированные конспекты для подготовки к сдаче сертификационных экзаменов на звание Microsoft Certified Solution Developer. Книга "Visual Basic 6 Distributed (экзамен 70-175)" не содержит ничего лишнего, только то, что действительно необходимо: фактический материал, типовые экзаменационные вопросы с разбором ответов и тестовый экзамен для самопроверки. Кроме того, вы найдете в н8й советы по стратегии и тактике сдачи экзамена.
       Серия "Экзамен — экстерном" — настоящая находка для преподавателей, которые смогут рекомендовать ее слушателям в качестве пособия для самостоятельной работы и тренировки. Книга не потеряет актуальности и после успешной сдачи экзамена: она поможет в нужный момент освежить в памяти необходимые сведения.
       Книги серии "Экзамен — экстерном" рекомендованы представительством корпорации "Майкрософт" в Москве в качестве учебного пособия для подготовки к экзаменам на звание MCSD.


    Автор: Томас М., Фокс Д.
    Издательсвто: Питер
    Год издания: 2001
    Кол-во страниц: 592
    Стоимость: 130,83 р.
    Формат: 60х90/16
    Переплёт: нет данных


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

    наверх


    Citycat by Email

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

    наверх


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

    Дата: 10.02.2002 05:28 | Раздел: Примеры кода | Автор: SerG

    Lens - Вы видели в стандартных программах Windows программу Линза? А никто не задумывался как она сделана? Это не очень сложно если посмотреть этот пример. Кроме изучения принципа действия "линзы" Вы изучите еще несколько полезных функций WinAPI.

    Дата: 09.02.2002 12:03 | Раздел: Статьи по VB | Автор: Эскин Михаил

    Элемент управления Microsoft Hierarchical FlexGrid - В VB 6.0 появился новый элемент управления, который пришел на замену MS FlexGrid. И хотя, MS FlexGrid остался - новый контрол, по своим возможностям, целиком и полностью вытеснил его. Это MS Hierarchical FlexGrid (таблица, с возможностью иерархического отображения данных). К большому сожалению, многие не пользуются им, или пользуются в ограниченных рамках, просто-напросто не зная всех его возможностей. Поэтому я хочу представить Вашему вниманию отрывок из книги (посвященный данному контролу) "Visual Basic 6.0 - Наиболее полное руководство для профессиональной работы в среде Visual Basic 6.0"

    Дата: 09.02.2002 05:57 | Раздел: ActiveX контролы | Автор: SerG

    MousePos - OCX предназначенный для определения текущей позиции курсора мышки. Если Вам нужно что-то подобное, то этот OCX специально для Вас! Он может многое! Определить текущую позицию? Пожалуйста! Переместить курсор мыши в определенное место! Да! И при этом с определенной скоростью? Нет проблем! Рекомендую всем.

    Дата: 09.02.2002 05:53 | Раздел: Примеры кода | Автор: Беляев Данила

    Background - Отличный пример замощения формы рисунком, т.е. создание фона формы с помощью АПИ, при ресайзе потери производительности нет! Если Вы уже раньше пытались это сделать, то Вы поймете для чего здесь API.

    Дата: 09.02.2002 05:43 | Раздел: Примеры кода | Автор: Беляев Данила

    TextCoder - Шифруем текст, но ключом является позиция символа, т.е. к ASC маске прибавляется позиция этого символа и всё это дело переводится в двоичную систему счисления - для непосвященных это будет тяжело сломать... В комплекте и алгоритм расшифровки конечно!

    Дата: 08.02.2002 05:26 | Раздел: Примеры кода | Автор: SerG

    DragFiles - Drag&Drop в Вашей программе? Нет ничего проще! Пример показывает как это нужно делать. Изюминка примера - он может "на ходу" переключать режим "прием файлов" и "отсутствие приема". Посмотрите - это интересно.

    Дата: 07.02.2002 05:53 | Раздел: ActiveX контролы | Автор: Эскин Михаил

    Pulse - Красивый OCX, предназначенный для "анимации" текста. Текст выводится как бы пульсирующим т.е. увеличивается в размере, потом уменьшается, и так далее. Мне понравилось. Посмотрите, красивый эффект.

    Дата: 05.02.2002 05:29 | Раздел: ActiveX контролы | Автор: Эскин Михаил

    DblListbox - Очень интересный контрол, который эмулирует двойной список. Имеет множество настроек. Например, цвет текста и фона. В общем, может быть кому пригодится. Написан признанным мастером Visual Basic - Михаилом Эскиным.

    Дата: 04.02.2002 08:37 | Раздел: Статьи по VB | Автор: Евдокимов Михаил

    Visual Basic + HTML = VBScript - Данная статья предназначена тем, кто хотел бы получить представление о программировании на Visual Basic Script, подмножестве языка Visual Basic. VBScript позволяет решать задачи, связанные с Internet, а именно создавать сценарии (или скрипты) управления объектами (кнопками, списками, ниспадающими меню и т. д.) на Web-страничках. Для понимания этого материала нужно иметь представление о структуре HTML-документа, а также основах программирования на Visual Basic. Описанные в статье сценарии могут быть использованы в браузере Microsoft Internet Explorer 3.0.

    Дата: 04.02.2002 06:04 | Раздел: ActiveX контролы | Автор: Эскин Михаил

    Reg 2.6 - Новая версия популярной утилиты для регистрации OCX и DLL. Данная утилита создана как альтернатива файлу Regsvr32.exe, и служит для регистрации и снятия регистрации ActiveX Control (файлы *.OCX) или динамических библиотек, написанных на VB (файлы *.DLL). Ведет журнал регистрации. В новой версии 2.6 программы устранены мелкие недочеты и ошибки. Во всех отношениях полезная программа.

    Дата: 03.02.2002 08:34 | Раздел: Статьи по VB | Автор: Дёмин Антон

    Отправка GET-форм из программы на VB - Почти на всех сайтах в интернете есть формы, т.е. определённые текстовые поля, CheckBox'ы (множественный выбор), кнопки и т.д. Примером формы может служить форма для отправки сообщения, например, в службу поддержки какого-то сайта. Для этой формы необходимо текстовое поле с именем автора, с его обратным e-mail'ом, с сообщением, а также кнопка для отправки сообщения. После того, как пользователь нажимает на эту кнопку, в браузере загружается страница с подтверждением отправки письма.



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

    22:11 / 9 фев.  модератору: Зделайте пожалуйста чат! |  Ответов: 1
    22:06 / 9 фев.  3dgraphics |  Ответов: 0
    18:46 / 9 фев.  Структура файлов *.lnk  |  Ответов: 0
    18:23 / 9 фев.  Как открыть фолдер из программы? |  Ответов: 2
    17:47 / 9 фев.  Поиск |  Ответов: 1
    21:56 / 8 фев.  Installable ISAM?????? |  Ответов: 0
    20:15 / 8 фев.  Новое сообщение без темы |  Ответов: 0
    14:43 / 8 фев.  VB6 не опознает формат database Access2000 |  Ответов: 1
    10:43 / 8 фев.  Скрытие чужого окна... |  Ответов: 2
    08:17 / 8 фев.  Метаданные из базы Access |  Ответов: 0
    01:52 / 8 фев.  Не работает ExitWindowsEx |  Ответов: 1
    21:57 / 7 фев.  Для Сергея: Автоматическая прокрутка ListBox |  Ответов: 0
    18:56 / 7 фев.  VB and SQL Server 7.0 (выполнение запросов) |  Ответов: 0
    16:38 / 7 фев.  Кто знает? |  Ответов: 1
    14:23 / 7 фев.  Автоматическая прокрука ListBox |  Ответов: 1
    14:21 / 7 фев.  Вопрос по MSCOMM  |  Ответов: 0
    11:57 / 7 фев.  VBScript & база данных... |  Ответов: 1
    08:09 / 7 фев.  Как определить раскладку клавы активного окна |  Ответов: 1
    16:24 / 6 фев.  ActivX |  Ответов: 3
    11:29 / 6 фев.  Где достать Конвертер VB->C++ или др.? |  Ответов: 1


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

    Использование API при работе с TextBox'ом (15)
    Перебор массива TextBox'ов (9)
    Как изменить цвет фона при изменении зн... (7)
    Описание элементов VScrollBar/HScrollBar (11)
    Контекстное меню. Практикум по созданию. (14)
    Размножить на форме картинку (13)
    Использование Images вместо CommandButton (7)
    Разноцветный баттон (10)
    Изменение длины ComboBox (8)
    Определить количество строк в ComboBox (7)
    Определение координат позиции курсора в... (12)
    Как сделать первую букву каждого слова ... (16)
    Скролинг текста (18)
    Получение содержимого n-ой строки в Mul... (13)
    Как спрятать данные за звездочками боле... (18)
    Как узнать данные, скрытые за звездочками (21)
    Проверка орфографии (11)
    Скрыть/показать мигающий курсор в Text Box (9)
    Определить количество строк в TextBox'е (9)
    Как уместить в Text Box больше 64 kb те... (9)
    Как быстро выделить текст для события G... (10)
    Как реализовать режим замены в текстово... (10)
    Проверить тип вводимой информации (9)
    Добавить новую линию в существующий тек... (9)
    Как очистить все TextBox'ы на форме (11)
    Как вернуться на то же место, при потер... (9)
    Запретить ввод определенных символов (9)
    Изменение вида каретки (10)
    Как заблокировать стандартное контекстн... (11)
    Загрузить/Сохранить текстовой файл из T... (10)
    3D-текст на форме (11)
    Удалить повторящиеся элементы (25)
    Поменять местами два рядом стоящих элем... (23)
    Сохранение данных из ListBox'а в виде п... (21)
    Сколько элементов выделено (18)
    Какой элемент выделен? (по номеру) (21)
    Автоматическое выделение элемента в Lis... (24)
    Пример поиска в ListBox'е (16)
    Сканировать ListBox в поисках элемента (13)
    Определение, какая item находится под к... (16)
    Как скопировать данные из одного ListBo... (17)
    Выделение элемента в ListBox'е при нажа... (14)
    Выделение всех элементов в ListBox'е (15)
    Как выравнять элементы ListBox'а вправо (17)
    Как автоматически скролить элемент List... (25)
    Описание элемента ListBox (19)
    Описание элемента TabStrip (46)
    Динамическое добавление панелей (41)
    Как определить, какая из панелей кликнута (35)
    Описание элемента Slider (38)
    Динамическое добавление в ImageList кар... (34)
    Word: Получение статистики открытого файла (40)
    Элемент управления Timer (56)
    Автоматический просмотр текущего значен... (43)
    Изменение свойства Style (стиль) элемен... (39)
    Вертикальное/горизонтальное написание в... (43)
    Создать анимированный Label (39)
    Создание 3D Text на Label (43)
    Выравнивание надписи на кнопке (33)
    Создайте свой 3D-Button (35)
    Добавление элемента CheckBox в элемент ... (34)
    Быстрый поиск элемента в списке (38)
    Как сделать первую букву каждого слова ... (27)
    Установить ширину ниспадающей части Com... (29)
    Как программно открыть/закрыть ComboBox (36)
    Изменилось ли содержимое ComboBox (28)
    Изменение высоты выпадающей части комбо... (30)
    Как установить количество открываемых с... (30)
    Изменение высоты выпадающей части комбо... (29)
    Изменение свойства Style (стиль) (46)
    Шифровка/расшифровка текста с использов... (65)
    Перекодировка текста: Rus-Lat (58)
    Получение всех параметров командной строки (54)
    Форма, реагирующая на события (min,max,... (60)
    Создание формы произвольных размеров (54)


    наверх


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

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


    наверх


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

    • 10 января 2001 года
      Интересный пример создания popMenu используя API функции CreatePopupMenu, AppendMenu, DestroyMenu, TrackPopupMenu и GetCursorPos.
      Пример показывает, как можно отлавливать события при нажатии на кнопках в заголовке формы. В примере использовались API функции - CallWindowProc и SetWindowLong.
    • 7 января 2001 года
      RealMid - уникальный пример воспроизведения миди файлов через Direct Sound, при этом звук не зависит от качества звуковой карты.
      Пример проигрывания mp3, wave, midi файлов с ускорением/замедлением скорости средствами библиотеки ActiveMovi входящей в состав Windows.
      Пример программного генерирования миди комманд


    наверх


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

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

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

    наверх


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

    BalloonMessage for MS Agent

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

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

    наверх

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

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

    Вопросы:


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

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

       Почему исполнение в MS Word любого польяовательского макроса на VB, даже не очень объемного, яанимает слишком много времени. Причем это происходит только при первом его яапуске. В дальнейшем работа любого существующего макроса происходит с яавидной скоростью.

    Здесь же хотел бы спросить почему иногда происходит яаметное яамедление яакрытия и открытия несложных документов в MS Word. Если кто-нибудь с этим уже сталкивался - поясните.


    Автор вопроса: Шевченко Александр Викторович

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

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


    Автор вопроса: Проскурин

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

       Мне срочно нужно писать прог для оценки автомобилей (вводишь марку, год и т. д. (ведение базы данных)). Помогите чем можете - статьями, в инете, исходниками ....


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

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

       Как на VB6 сделать чтобы текст типа 5x-2y введеный в TextBox присвоился переменной не как текст, а как уравнение с неизвесными?




    Ответы:


    Вопрос:

       Народ, подскажите кто-нить, почему API функция ExitWindowsEx не завершает работу или не выключает комп, а завершает сеанс данного юзера и предлагает войти под новым именем ?

    Ответ:

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

    Наверное потому, что ты не ту константу используешь.
    Вот описание ExitWindowsEx

    Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx"
    (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
    uFlags
      Определяет тип выключения. Этот параметр должен быть некоторой комбинацией следующих величин:
    EWX_FORCE = 4
      Заставляет процессы завершиться. Когда этот флаг установлен, Windows не посылается сообщения WM_QUERYENDSESSION и WM_ENDSESSION в работающие в системе приложения. Это может стать причиной потери приложениями данных. Следовательно, Вы должны использовать этот флаг только в аварийной ситуации.
    EWX_LOGOFF = 0
      Отключает все процессы работая в контексте безопасности процесса,который вызвал функцию ExitWindowsEx. Затем он завершает сеанс данного юзера.
    EWX_POWEROFF
      Завершает работу и выключает питание. Система должна поддержать автоотключение питания.
      Windows NT: Вызывающий процесс должен иметь привилегию SE_SHUTDOWN_NAME.
      Windows 95: Привилегии Безопасности не поддерживаются или не требуются.
    EWX_REBOOT = 2
      Завершает работу системы и перезагружает компьютер.
      Windows NT: Вызывающий процесс должен иметь привилегию SE_SHUTDOWN_NAME.
      Windows 95: Привилегии Безопасности не поддерживаются или не требуются.
    EWX_SHUTDOWN = 1
      Завершает работу системы и подготовит к отключению питания. Все файловые буферы будут сброшены на диск, и все процессы завершатся.
      Windows NT: Вызывающий процесс должен иметь привилегию SE_SHUTDOWN_NAME.
      Windows 95: Привилегии Безопасности не поддерживаются или не требуются.

    · dwReserved
    Зарезервировано; Этот параметр игнорируется.

    Данные из API-Guide 3.6 http://www.allapi.net (отличный справочник по WinAPI с примерами на VB, рекомендую), перевод мой+ socrat 97(чур не бить)


    Вопрос:

       Пожалуйста подскажите, как загрузить в ListView текст из файла?

    Ответ:

    Автор ответа: Игорь

    При условии, что файл текстовый, то есть нормально прослеживается EOF, сделай так:
    Dim Str As String
    Open "C:\autoexec.bat" For Input As 1 'вместо autoexec.bat указывается свой файл
    Do Until EOF(1)
    Input #1, Str
    ListView1.ListItems.Add , , Str
    Loop
    Чтобы было красивее, можно вставить ListView1.View=2. Тогда все данные будут выводиться как список.


    Вопрос:

       Подскажите где можна скачать MSDN для VB6, бея справочника долго нужно париться над ним.

    Ответ:

    Автор ответа: Игорь

    Вообще-то MSDN можно скачать с официального сайта www.microsoft.com, но вся эта система помощи занимает около 3 Гб. Лучше ищи переводы ее частей MSDN на русский.


    Вопрос:

       Подскажите где можна скачать MSDN для VB6, бея справочника долго нужно париться над ним.

    Ответ:

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

    У меня MSDN занимает два диска, долго тебе придется качать.
    Попробуй кликнуть по ссылке в самом начале:
    Господа!!! читайте MSDN!!! [http://msdn.microsoft.com/library]


    Вопрос:

       Как сделать чтобы форма была всегда поверх всех окон?

    Ответ:

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

    Делается это очень просто.

    Засунь это в модуль:
      Public Declare Function SetWindowPos Lib "user32" _
      (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _
       ByVal X As Long, ByVal Y As Long, ByVal cx As Long, _
       ByVal cy As Long, ByVal wFlags As Long) As Long
       Public Const HWND_NOTOPMOST = -2
       Public Const HWND_TOPMOST = -1
       Public Const SWP_NOACTIVATE = &H10
       Public Const SWP_NOMOVE = &H2
       Public Const SWP_NOSIZE = &H1
      
      Public Sub SetFormPosition(frmHandl As Long, TopPosition As Boolean)
      If TopPosition Then
      SetWindowPos frmHandl, HWND_TOPMOST, 0, 0, 0, 0, _
      SWP_NOACTIVATE Or SWP_NOSIZE Or SWP_NOMOVE
      Else
      SetWindowPos frmHandl, HWND_NOTOPMOST, 0, 0, 0, 0, _
      SWP_NOSIZE Or SWP_NOMOVE
      End If
      End Sub

    Это сунь в любом месте формы:
    call SetFormPosition(Me.hwnd, True)
      
    Комментарий:
    "Это работает точно по WINDOWS 98 и под WINDOWS 98 SE, под другие операционки не пробовалось, проблемы есть точно в WIN XP."


    Вопрос:

       Как сделать чтобы форма была всегда поверх всех окон?

    Ответ:

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

    Вот здесь: http://vbnet.ru/http://vbnet.ru/faq/showtopic.asp?id=46


    Вопрос:

       А как с помощью API вызвать диалоговое окно выбора цвета и сохранить новые значения??

    Ответ:

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

    Private Type ChooseColor
         lStructSize As Long
         hwndOwner As Long
         hInstance As Long
         rgbResult As Long
         lpCustColors As String
         flags As Long
         lCustData As Long
         lpfnHook As Long
         lpTemplateName As String
    End Type

    Private Declare Function ChooseColor Lib "comdlg32.dll" Alias "ChooseColorA" (pChoosecolor As CHOOSECOLOR) As Long
    Private Sub Command1_Click()
          Dim cc As ChooseColor
          Dim ret as long
      
          cc.lStructSize = Len(cc)
          'При указании хендела доступ к форме временно блокируется, до закрытия вызванного диалога(выбор цвета).
          cc.hwndOwner = Form1.hWnd 'Хендел вызывающей формы.
          cc.hInstance = App.hInstance
          cc.flags = 0 'Состояния вызываемого окна. 0-default state. (0-14) шагом = 2
          cc.lpCustColors = String$(16 * 4, 0)
          
          ret = ChooseColor(cc) 'Вызываем диалог
      
          If (ret) Then 'Если была нажата кнопка ОК
             BackColor = cc.rgbResult 'Меняем цвет фона формы на выбранный нами цвет
          Else
             MsgBox "Действие отменено"
          End If
    End Sub


    Вопрос:

       Подскажите пожалуйста! Как на VB установить шрифты в систему. Пробовал использовать API функцию AddFontResource. Она устанавливает вибраний шрифт в систему, только после перезагрузки шрифт удаляется из системы.

    Ответ:

    Автор ответа: Игорь

    Нужно сначала скопировать файл в папку Fonts, а затем использовать AddFontResource.


    Вопрос:

       Подскажите пожалуйста! Как на VB установить шрифты в систему. Пробовал использовать API функцию AddFontResource. Она устанавливает вибраний шрифт в систему, только после перезагрузки шрифт удаляется из системы.

    Ответ:

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

    Бывает необходимо добавить в систему шрифт. Для его использования не достаточно просто скопировать файл шрифта в C:\WINDOWS\Fonts.

    Необходимо инсталлировать, это выполняет функция API AddFontResource, которая объявляется так:

    Declare Function AddFontResource& Lib "gdi32" Alias "AddFontResourceA" (ByVal lpFileName As String)

    Использование:

    1.Можно файлы шрифтов включить в дистрибутив с помощью встроенных возможностей Package & Deployment Wizard .
    В форме:
    2.Потом с, помощью MyFile = Dir("C:\WINDOWS\Fonts\Helvenlt.ttf"), проверяем из своей программы, наличие файла в системе:

    If MyFile = "Helvenlt.ttf" Then
    Exit Sub
    Else 'если его нет, то копируем и устанавливаем шрифт.
    'Копируем шрифт в систему
    FileCopy App.Path & "\Helveblt.TTF", "C:\WINDOWS\Fonts\Helvenlt.ttf" 'Необходимо скопировать шрифт в систему
    'Устанавливаем шрифт
    Call AddFontResource("Helvenlt.ttf") 'Команда устанавливает шрифты в систему
    End If
    Текст1.FontName = "HelveticaLT" 'Используем шрифт


    Вопрос:

       Подскажите пожалуйста! Как на VB установить шрифты в систему. Пробовал использовать API функцию AddFontResource. Она устанавливает вибраний шрифт в систему, только после перезагрузки шрифт удаляется из системы.

    Ответ:

    Автор ответа: K. Igor

    О каких шрифтах идет речь. Если это обычные, то они просто переписываются в папку C:\windows\fonts, на VB можно с помощью copy.


    Вопрос:

       Есть переменная WindowsDirectory и я всегда ее использовал для временных файлов, так стабильнее чем Temp но вдруг мне пришло письмо что моя программа не работет в W2k Server так как он не распознает эту переменную и пишет файл куда хочет, а когда его нужно прочитать то читает тоже откуда хочет и эти папки не сходятся. Отсюда информация не теряется, а просто пишется в одно месте, а читается из другого места - т.е. файла нулевого!
    Стандартные переменные $System_Root$ VB не понимает!
      
    P.S. В W2K Proffesional все работает!

    Ответ:

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

    Попробуй воспользоваться API функцией GetTempPath.
      
    Private Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long

    Помести куда нужно:
      
    Dim szTempPath As String * 100
    GetTempPath 100, szTempPath
      
    ВСЁ. Теперь переменная будет содержать путь Темп директории 8)


    Вопрос:

       как расположить несколько чисел в порядке воярастания?

    Ответ:

    Автор ответа: K. Igor

    Смотря какие числа. Если надо, что бы при вводе 5 чисел они располагались по возрастанию, то через функцию if/then/else это можно выполнить.


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

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

    наверх


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

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