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


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



Рассылки Subscribe.Ru
VB.NET-World
Новости сайта IgorykSoft и советы по программированию
DanSoft о Visual Basic
Visual Basic.NET Уроки.

Ссылки:

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

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

       Обратите внимание на раздел "Конкурс"!
    Читайте!


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




    Citycat by Email

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

    наверх


    Конкурс!

    Здравствуйте, любители Visual Basic! Наконец-то подведены итоги двух конкурсов, проводившихся на VBNet.Ru в течении лета!
    В конкурсе на лучшую статью участвовало 4 работы. Спасибо всем, кто принял участие в конкурсе, прислав свои работы, а также тем, кто помогал в выборе победителя, голосовав на сайте. О результатах. Места распределились следующим образом:

    Первое место: Шатохина Н.А. "Рекомендации по разработке библиотеки классов"
    Второе место: Хованский Ян "ASP в безопасности ".

    Какие же призы мы приготовили авторам? Шатохина Н.А. получает подписку на журнал "Hard'n'Soft". Хованский Ян награждается комплектом компакт дисков от VBNet.Ru.

    Также впервые был проведён конкурс на лучший пример и ActiveX. Примеров и контролов было много, нам было нелегко выбрать из них лучшие... Места распределились так:

    Первое место: Юмашин Алексей "FormToINI Control", "WalkOnEnter", "ListControls"
    Второе место: CyRax "RichAPI" и "BP API ToolBar".
    Третье место: Vir "ScreenSaver", "3DХвост", "Кубик".

    Победителей этого конкурса мы решили наградить нашей продукцией. Юмашин Алексей получает полный комплект комакт дисков от VBNet.Ru (их у нас 5). CyRax получит люые 3 компак диска на выбор. И Vir - любые 2 CD.

    Традиция проведения конкурсов будет продолжена! Объявляются новые конкурсы на лучшую статью и на лучший пример. Как и прежде, главный приз - подписка на журнал "Hard'n'Soft". Присылайте свои статьи, примеры на сайт и становитесь победителями конкурса!



    наверх


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

    Дата: 14.10.2003 20:53 | Раздел: Примеры кода | Автор: Alex

    Процессы - Пример демонстрирует работу с процессами и потоками.

    Дата: 13.10.2003 20:04 | Раздел: Примеры кода | Автор: Layder

    ADOcombo - От автора: Доработанный комбобокс - вторая версия. Для работы с ADO (соответственно, обязательно должна ' быть подключена библиотека microsoft ActivX Data Object) ' и SQL - тестировалось с ms access и ms sql ' Работает автоподстановка ' Загрузка данных из указанного запроса ' AfterUpdate - действия после обновления ' BeforeUpdate - действия перед обновлением - для ' корректной работы требует наличия ID_записи ' AnswerNotList - автоответ на ввод данных, ' отсутствующих в комбобоксе ' ListOnly - от значения ее зависит, создавать ли эвент ' NoInList ' ListOnlyAuto - от значения ее зависит, обрабатывать ' эвент NoInList программеру или фунции AnswerNotList ' SetToStringFromID_Record - встает на строку, ID которой ' соответствует переданному числу. ' SetToId_RecordFromString - встает на строку, текст ' которой соответствует переданному тексту. ' В случае возникновения ошибки видно, какая функция - ' внешняя или внутренняя, ее вызвала. Пример использования внутри. Кто имеет что добавить - буду рад. От User Unknown: Интересный код. Некоторым может пригодиться....

    Дата: 13.10.2003 20:00 | Раздел: Примеры кода | Автор: Millenium

    Analyzer 1.08 - От автора: Данныая программа (исходный код программы) демонстрирует как можно получать байты с звукого устройства и как работать с ними: * Как определить звуковой спектор * Как построит простой, линейный и точечный анализатор звукого сигнала * Как работать с библиотекой "winmm.dll" - waveInAddBuffer - waveInClose - waveInGetNumDevs - waveInOpen - waveInPrepareHeader - waveInReset - waveInStart - waveInStop - waveInUnprepareHeader * Как работать с библиотекой "user32" - SetWindowPos Исходный код распростроняется свободно При добавлени, изменении и модификации кода, любезно прошу выслать мне модифицированную копию программы (только исходники) В исходнике чатильно описаны все функции и команды Пример очень красиво получиося. Работоспасиобность 100%. Протестировано на следующих ОС на 100% работаспособность: Windows 98, 2000* и Me ---------------------- * В Windows 2000 по непонятным прицина шкала начинается не сначала Историю версий можете прочесть в файле history.txt Ответы на часто задаваемые вопросы (FAQ) можете прочесть в FAQs.txt.

    Дата: 13.10.2003 19:55 | Раздел: Примеры кода | Автор: Власенко Федор

    TaskPane - От автора: Данный пример показывает как можно создать панель подобие Task Pane, которая присутствует в Office XP. На самом деле там она создана иначе. У автора нет возможности развивать данную идею дальше. Так-что буду очень благодарен тому, кто исправит существующие ошибки и не забудет меня. Жду ваших реализов. С уважением, Власенко Федор. От User Unknown: Действительно неплохой код. всем, увлекающимся VBA - качать немедленно:)

    Дата: 13.10.2003 19:48 | Раздел: Примеры кода | Автор: vitus

    Студенты - От автора: Программа для Приема студентов в ВУЗ. Эта программа была сделана для нужд моего Университета но, ее не захотели использовать по этому я хочу ее предложить Вам может, что-то из нее кому-нибудь пригодиться. Цель программы, Внести в базу данных список абитуриентов , что бы в последующем автоматизированно составить приказ на зачисление, и представление на зачисление в университет, использовал в своей программе MSHFLEXGRID, DataGrid, Adodc, вроде бы. Ну вот и все если возникнут вопросы, или какая - нибудь критика все выслушаю в свой адрес. Заранее благодарен Шаркеевич Виталя. ОТ User Unknown: Простенькая база данных. Отличается интерфейсом, созданным с помощью стандартного мастера. Многое не работает, в меню "Новое в этой версии" красуется только 'Text1'. Будет полезна начинающим строителям "даза банских аппликух":-)

    Дата: 13.10.2003 19:45 | Раздел: Примеры кода | Автор: R@DIST

    Наблюдатель - От автора: Надзиратель за тем,что видит курсор,есть функция записи. От User Unknown: программа на подобии OpenPass. Есть несколько незначительных ошибок (в том числе и грамматических:)), но программа свою функцию выполняет исправно.

    Дата: 13.10.2003 19:41 | Раздел: Примеры кода | Автор: Сазонов М.А.

    Монитор - От автора: Управление монитором: вкл/выкл монитор, перевести в экономичный режим. От User Unknown: пара мессаджей для работы с монитором.



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

    06:39 / 19 окт.  Что за...!? Ой! Помогите! | Хитов: 0 |  Ответов: 0
    06:33 / 19 окт.  Free Fire II !!! | Хитов: 4 |  Ответов: 1
    03:33 / 19 окт.  Winsock | Хитов: 2 |  Ответов: 0
    02:00 / 19 окт.  Как узнать количество записей в колонке | Хитов: 5 |  Ответов: 1
    01:57 / 19 окт.  Opera | Хитов: 14 |  Ответов: 1
    21:34 / 18 окт.  Package & Deployment Wizard | Хитов: 19 |  Ответов: 3
    20:04 / 18 окт.  Ответьте на вопросик... | Хитов: 22 |  Ответов: 2
    19:59 / 18 окт.  Авторан | Хитов: 14 |  Ответов: 1
    16:58 / 18 окт.  DAO и DBGrid | Хитов: 11 |  Ответов: 1
    15:11 / 18 окт.  Звезды | Хитов: 29 |  Ответов: 5
    13:03 / 18 окт.  захват кирилку где я путаю! ;) | Хитов: 15 |  Ответов: 0
    12:15 / 18 окт.  Textbox | Хитов: 21 |  Ответов: 1
    01:52 / 18 окт.  красные звёздочки | Хитов: 5 |  Ответов: 0
    01:52 / 18 окт.  красные звёздочки | Хитов: 51 |  Ответов: 6
    22:40 / 17 окт.  РесурсЫ | Хитов: 23 |  Ответов: 2
    21:45 / 17 окт.  И снова НЕСОВМЕСТИМОСТЬ!!!! | Хитов: 42 |  Ответов: 3
    21:38 / 17 окт.  Как работать с USB? | Хитов: 16 |  Ответов: 0
    21:36 / 17 окт.  Как работать с USB | Хитов: 9 |  Ответов: 0
    19:30 / 17 окт.  Интеллектуальный ввод | Хитов: 28 |  Ответов: 2
    17:47 / 17 окт.  SMS на VB | Хитов: 18 |  Ответов: 0


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

    Создание консоли из текстового файла (89)
    Стандартный диалог завершения работы (165)


    наверх


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



    наверх


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



    Новые статьи:



    наверх


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

    Новые статьи:



    Новые примеры:



    наверх


    Один момент из жизни форума: Как в RUN-TIME добавть контролы (кнопку) на форму?

    Вопрос:
    Автор вопроса: Atma

       .NET.

    1. Как быть с событиями этих созданных контролов?
    1. Заодно хотелось бы узнать в RUN-TIME создавать форму и на нее в RUN-TIME создавать контролы?


    Ответы:

    Автор: Павел
        1. Можно в рантайме создавать обработчики событий с помощью AddHandler. 2. Можно и форму. По сути, то, что ты создаёшь в дизайнере, всё равно создаётся в ран-тайме кодом - посмотри код создания контролов в регионе в модуле формы.

       Вот примерчик:

    Dim f As New System.Windows.Forms.Form
    f.Size=New Size(100, 200)
    f.Text="Моя форма"
    Dim a as New label
    a.text="лабель"
    a.visible=true
    a.location=new point(10,20)
    f.Controls.add a
    f.show



    наверх


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

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

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

    наверх

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

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

    Вопросы:


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

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

       Делаю прогу (что-то вроде Winampa), возник такой вопрос: как узнать сколько (по времени) будет проигрываться mp3 или wav?


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

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

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


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

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

       Существует кем-то написанная программа, работающая в фоновом режиме, хочу послать ее окну комбинацию клавиш:
    Shift+a, ctrl+a, alt+a (a – для примера). Знаю hwnd этого окно, пробовал при помощи sendmessage, но посылается только отдельная клавиша, а как комбинацию послать не знаю


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

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

       Возвращаясь к напечатанному:

    Отвечал: Alexander
    Чует моё сердце, что пытаетесь менять данные в полях БД с атрибутами числовой/логический. Это так?
    В таком случае для испольяуются объекты StdDataValue, StdDataFormat, а не только Textbox.
    Данные меняются и в полях с атрибуто- текстовый, обновления все равно нет. Можно ли по-подробнее про объекты StdDataValue, StdDataFormat?


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

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

       На форме есть RichTextBox. Как узнать скорость ввода символов?


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

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

       Есть ли какая нибуть ф-ция для конвентирования файлов bmp в другие форматы?


    Автор вопроса: Владислав

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

       Как разместить на листе Excel Control PictureBox из Vb6 или иной со свойствами ScaleWidth, ScaleHeight и. т. п., пригодный для рисования любых графиков или их вставки и анализа яркости и цветов отдельных точек.


    Автор вопроса: Котофей

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

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


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

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

       Как красивее написать следующее условие:
      Если NameVariable = 0 или NameVariable = 1 или NameVariable = 2 или NameVariable = 3 или NameVariable = 1000 ...и т.д.
    (Переменная одна, а значений, при которых это условие должно выполнятся, может быть ооооооочень много).


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

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

       1. Как различить нажатие левой и правой клавиши Ctrl ( Shift, Alt). В программе мне необходимо выполнить два разных действия при нажатии левой или правой клавиши?
    2. Аналогично, как различить нажатие Enter и Enter дополнительной клавиатуры?


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

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

       Подскажите, как достучаться до динамически созданного контрола.
    Я динамически добавил на форму CombBox. Как теперь получить к нему доступ: произвести чтение, проверить есть ли он вообще.
    В Васике 6.0 можно было создавать массив элементов, и обращаться к ним через индексы, а как это же сделать в NET'e.




    Ответы:


    Вопрос:

       Как добавить заставку к программе, т.е. сначала идёт запуск заставки, а после сама программа?

    Ответ:

    Автор ответа: C...R...a...S...H

    В модуле пишешь процедуру

    sub main
    frmLOADER.show
    load frmMain
    load frmTest
    load ....
    unload frmloader
    frmmain.show
    end sub

    И в свойствах проекта ставиш загружать Sub Main первым.
    НО незабудь что все эти загруженые формы будут висеть в памяти ЭВМ до завершения программы если ты ими не воспользовался тебе надо их принудительно выгрузить unload frmXXX, а если не хочеш выгружать выполни команду End.


    Вопрос:

       Функция Time() возвращает время на компьютере, а как можно получить время на другом компе в локальной сети?

    Ответ:

    Автор ответа: Anton Lozovski

    Копай через вызов net.exe.


    Вопрос:

       Как можно изменить текущий принтер по умолчанию? Например, Set printer = "Canon1000".

    Ответ:

    Автор ответа: Sergey Morenets

    Легко, если ты знаешь какое-то его свойство, например DeviceName

    For Each vPrinter in Printers
         if vPrinter.DeviceName = "HP 1100" Then
            Set Printer = vPrinter
            Exit For
         End If
    Next




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

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

    наверх


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

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