Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

Технологии Программирования - Visual Basic


Служба Рассылок Subscribe.Ru
Технологии Программирования - Visual Basic
12/2001, 18 НОЯБРЯ :: [ ОБНОВЛЕНИЕ РАЗДЕЛА :: СОВЕТ ПО VISUAL BASIC :: ФОРУМ ]

  ОБНОВЛЕНИЕ РАЗДЕЛА
Здравствуйте, уважаемые подписчики рассылки "Технлогии Программирования - Visual Basic"! В раздел Visual Basic добавлено несколько довольно интересных и необходимых для программистов материалов. И, конечно, не обошлось без участия Павла, который в очередной раз предоставил свою статью.

» Microsoft FlexGrid Павел Сурменок
Элемент Microsoft FlexGrid используется для вывода табличных данных. Также он позволяет форматировать текст, добавлять изображения и создавать связь с базой данных.
» Рекурсивный поиск файлов и папок Александр Бельбаков
В этой статье описывается минимальный код для поиска файлов и папок с использованием API функций FindFirstFile, FindNextFile и FindClose.
» Recursive Search (0) Александр Бельбаков
Иногда бывает необходимо проверить, существует ли определённый файл. Это можно сделать с помощью функции Dir. Но эта функция не поможет, если вам необходимо найти какой - то файл или каталог. В этом примере используется рекурсивный метод сканирования папок.
» Menu Item Help (6) Александр Бельбаков
Почти каждому программисту требуется показать описание элемента меню при наведении на него курсора. Оказывается - это проще простого, всего пара API функций.
» Comm Terminal (6) Александр Бельбаков
Comm Terminal - простенький пример использования ActiveX элемета Comm Control. В данном случае элемент управления используется для работы с модемом. Но через него также можно работать с любым устройством, подключённым к COM порту.

 СОВЕТ ПО VISUAL BASIC
Некоторые API функции возвращают строки фиксированной длины, где необходимое значение заканчивается нулевыми символами. Чтобы получить необходимое значение без лишних символов используйте следующую функцию:

Private Function TrimNull(wTrim As String) As String
Dim Pos As Integer
Pos = InStr(wTrim, Chr$(0))
If Pos Then
TrimNull = Left$(wTrim, Pos - 1)
Exit Function
End If
TrimNull = wTrim
End Function

  ФОРУМ
Примите участие в форуме по Visual Basic, возможно у вас есть какие - либо вопросы или ответы уже на заданные вопросы. Последние темы:

» Помогите разобраться! (0 + 0) Алексей
» Обновление ListBox (0 + 0) Rich

[ РАССЫЛКУ ПОДГОТОВИЛ :: АЛЕКСАНДР :: ВЕДУЩИЙ РАЗДЕЛА VISUAL BASIC ]


http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное