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

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


Информационный Канал Subscribe.Ru - www.lycos.ru

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


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

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

Нет тем.

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


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

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

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

Ссылки:

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

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

       Очередной, ничем не отличающийся от остальных, выпуск рассылки.
    Читайте!


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




    Книги

    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
    Стоимость: 177 р.
    Формат: 70х100/16
    Переплёт: мягкий

    Excel, VBA, Internet в экономике и финансах

    Книга является руководством по использованию Microsoft Excel, разработке офисных бизнес-приложений средствами VBA и конструированию Web-страниц на базе DHTML и VBScript. Рассматриваются приемы создания отчетной финансовой и экономической документации средствами MS Excel, способы анализа и обработки собранной информации для принятия на ее основе оптимального решения; даются ответы на вопросы, которые возникают у программиста при разработке автоматизированных и интегрированных систем с помощью VBA; описываются особенности конструирования пользовательских элементов управления ActiveX, а также написания Windows-сценариев. Большое внимание уделено принципам создания интерактивных Web-страниц, виртуальных каталогов и магазинов. Книга содержит уникальную коллекцию типичных примеров. Почти каждая глава заканчивается списком упражнений, способствующих закреплению материала


    Автор: Гарнаев А
    Издательсвто: BHV - Санкт - Петербург
    Год издания: 2001
    Кол-во страниц: 816
    Стоимость: 230 р.
    Формат: 70х100/16
    Переплёт: мягкий

    MCSD. Сертификационный экзамен 70-175. Разработка распределенных приложений на Visual Basic 6.0. Учебный курс (+ CD-ROM)

    Настоящий учебный курс рекомендован корпорацией Microsoft как официальное пособие для подготовки к экзамену 70-175 «Designing and Implementing Distributed Applications with Microsoft Visual Basic 6.0» по программе сертификации разработчиков программных решений на основе продуктов Microsoft (Microsoft Certified Solutions Developer, MCSD). Эта книга познакомит Вас с основными понятиями, концепциями и методами, необходимыми для разработок распределенных программных решений на базе Visual Basic 6.0.


    Автор: MCSD Training Kit
    Издательсвто: Русская Редакция
    Год издания: 2000
    Кол-во страниц: 400
    Стоимость: 272 р.
    Формат: 70х100/1670х100/16
    Переплёт: мягкий

    Microsoft Visual Basic 5.0

    В книге рассматривается новая пятая версия Microsoft Visual Basic - языка программирования, являющегося фактическим стандартом визуального проектирования приложений. Описываются общие черты Visual Basic, реализованные в нем концепции объектно-ориентированного программирования, среда разработки (IDE). Далее рассматривается объектно-ориентированная модель Visual Basic и доступные разработчику объектные компоненты. Подробно описываются технологии программирования на языке Visual Basic и SQL, отладка и оптимизация кода приложения, вопросы компиляции исполняемых модулей. В последующих главах освещаются практические вопросы построения приложений - работа с текстом и графикой, механизмы доступа и управления данными, работа с внешними базами данных и создание приложений клиент/сервер. Книга предназначена для широкого круга программистов, работающих в области обработки данных и информационных систем.


    Автор: Шмидт В
    Издательсвто: ABF
    Год издания: 1997
    Кол-во страниц: 688
    Стоимость: 85 р.
    Формат: 84x108/16
    Переплёт: мягкий

    Microsoft Visual Basic 6.0

    Нет описания


    Автор: Лабор В, Макарчук Д
    Издательсвто: нет данных
    Год издания: 2001
    Кол-во страниц: 160
    Стоимость: 60 р.
    Формат: 70х100/16
    Переплёт: мягкий

    Microsoft Visual Basic 6.0. Мастерская разработчика (+ CD-ROM)

    Книга состоит из 3 частей (34 главы) и предметного указателя. Написанная живо и доходчиво, она позволит освоить множество полезных приемов программирования, в том числе объектно-ориентированного, и научит, как создавать 32-разрядные приложения для Windows 95/98 и Windows NT — от экранных заставок до программ, ориентированных на Интернет. Кроме того, Вы узнаете, как расширить возможности языка за счет функций Win32 API и воспользоваться преимуществами технологии ActiveX.


    Автор: Джон Кларк Крейг, Джефф Уэбб
    Издательсвто: Русская Редакция
    Год издания: 2001
    Кол-во страниц: 720
    Стоимость: 272 р.
    Формат: 70х100/16
    Переплёт: твёрдый

    VB Script и ActiveX

    Книга предназначена для разработчиков Web - приложений на языке VBScript, желающих повысить свой профессиональный уровень и стать экспертами в этой области. В ней подробно рассказывается о новых возможностях VBScript, включая использование именованных констант, функций, переменных и коллекций, приводится вся необходимая информация о технологии ActiveX, принципах взаимодействия VBScript и Visual Basic при создании приложений, работающих на сервере. Прочитав эту книгу, вы научитесь использовать звуковые эффекты, создавать анимированную графику, строить формы для ввода данных, узнаете, как с помощью VBScript создать в Web электронный магазин и отслеживать число посетителей и деланные ими покупки. Вы даже сумеете написать увлекательную мультимедийную игру для Web.


    Автор: Скотт Палмер
    Издательсвто: Питер
    Год издания: 1999
    Кол-во страниц: 368
    Стоимость: 94 р.
    Формат: 70х100/16
    Переплёт: мягкий

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

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


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

    Visual Basic 6 Desktop. Экзамен 70-176

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


    Автор: Майкл Макдоналд
    Издательсвто: Питер
    Год издания: 2001
    Кол-во страниц: 608
    Стоимость: 123 р.
    Формат: 60x90/16
    Переплёт: мягкий

    Visual Basic 6. Руководство разработчика (+ CD-ROM)

    Эта книга, написанная известным специалистом и неутомимым пропагандистом Visual Basic, представляет собой прекрасный путеводитель по одному из наиболее популярных визуальных средств разработки Windows-приложений. Подробно освещаются такие ключевые темы программирования на Visual Basic, как проектирование и использование элементов ActiveX, программирование баз данных и разработка Web-приложений. Несомненный интерес представляют главы, посвященные работе с графикой. Большое количество тщательно продуманных примеров облегчает восприятие материала. Подбор материала и стиль изложения делают издание интересным и полезным для программистов разных уровней.


    Автор: Евангелос Петрусос
    Издательсвто: BHV, Ирина, SYBEX Inc
    Год издания: 2000
    Кол-во страниц: 1072
    Стоимость: 267 р.
    Формат: 70x100/32
    Переплёт: твёрдый


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

    наверх


    Как заблокировать действия кнопок управления формой

    Данный пример покажет, как можно заблокировать события кнопок MinButton, MaxButton и CloseButton. Добавьте на форму 2 элемента CommandButton. Изменяя цифру в событии Command1_Click() можно запретить получать форме отклик от кнопок минимизации (цифра 3), максимизации (цифра 4) и закрытия формы (цифра 6). Вторая командная кнопка добавлена для корректного закрытия вашей программы в случае запуска данного примера с параметром 6.

    Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, ByVal bRevert As Long) As Long
    Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
    Private Const MF_BYPOS = &H400&
    Public Sub KillingMenu(hWnd As Long, what As Integer)
    Dim hSysMenu As Long
    hSysMenu = GetSystemMenu(hWnd, 0)
    Call RemoveMenu(hSysMenu, what, MF_BYPOS)
    End Sub
    Private Sub Command1_Click()
    'замените цифру 6(блокировка CloseButton) на 3(блокировка MinButton) или 4(блокировка MaxButton)
    KillingMenu Me.hWnd, 6
    End Sub
    Private Sub Command2_Click()
    End
    End Sub

    наверх


    Прорисовка системных иконок на форме

    Все вы знаете про функцию MsgBox (ссылка для незнающих эту функцию). При использовании этой функции вы также можете вывести одну из четырех иконок, которые заставляют пользователя обратить внимание. Данный пример как раз и позволяет вытащить системные иконки и расположить их на вашей форме.

    Public Enum enStockIcons
    IDI_APPLICATION = 32512&
    IDI_CRITICAL = 32513&
    IDI_QUESTION = 32514&
    IDI_EXCLAMATION = 32515&
    IDI_INFORMATION = 32516&
    IDI_WINLOGO = 32517&
    IDI_UNKNOWN = 32518&
    End Enum
    Private Declare Function LoadIconApi Lib "user32" Alias "LoadIconA" (ByVal hInstance As Long, ByVal lpIconName As Long) As Long
    Private Declare Function DrawIconApi Lib "user32" Alias "DrawIcon" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal hIcon As Long) As Long
    Private Sub Form_Paint()
    Dim hIcon As Long
    'здесь вы можете определить, какую иконку загрузить
    hIcon = LoadSystemIcon(IDI_QUESTION)
    If hIcon > 0 Then
    'заменяя цифры 10,10 вы определяете месторасположение иконки на форме
    Call DrawIcon(Me.hdc, 10, 10, hIcon)
    End If
    End Sub
    Public Function LoadSystemIcon(ByVal StockIcon As enStockIcons) As Long
    Dim lRet As Long
    lRet = LoadIconApi(0, StockIcon)
    If Err.LastDllError = 0 Then
    LoadSystemIcon = lRet
    End If
    End Function
    Public Sub DrawIcon(ByVal mHdc As Long, ByVal xPos As Long, ByVal yPos As Long, ByVal hIcon As Long)
    Dim lRet As Long
    lRet = DrawIconApi(mHdc, xPos, yPos, hIcon)
    If (Err.LastDllError > 0) Or (lRet = 0) Then
    Debug.Print "DrawIcon failed"
    End If
    End Sub

    наверх


    Затемнение кнопки 'закрыть' и одновременное удаление системного меню

    Пользуйтесь данным примером очень аккуратно! При двойном нажатии кнопки программа "выполняет недопустимую операцию"

    Расположите на форме элемент CommandButton.

    Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
    'процедура определения системного меню (кнопки закрытия)
    Private Declare Function DestroyMenu Lib "user32" (ByVal hMenu As Long) As Long
    'процедура удаления меню

    Sub Disable_SysMenu(handle As Long)
    On Error GoTo errhan
    Dim menu_handle As Long 'переменная с хэндлом меню
    menu_handle = GetSystemMenu(handle, 0)
    DestroyMenu (menu_handle)
    Exit Sub
    errhan:
    End Sub

    Private Sub Command1_Click()
    Disable_SysMenu (Form1.hwnd)
    End Sub

    наверх


    Эффекты при закрытии формы

    Функция AnimateWindow дает возможность Вам произвести специальные эффекты при появление или скрытии окон. Имеются три типа анимации: развёртывание, соскальзывание и постепенное появление.

    Private Declare Function AnimateWindow Lib "user32" (ByVal hwnd As Long, ByVal dwTime As Long, ByVal dwFlags As Long) As Boolean
    Const AW_HOR_POSITIVE = &H1 'Анимация окна слева направо.
    'Этот флаг используется совместно с эффектами развёртывания и соскальзывания.
    Const AW_HOR_NEGATIVE = &H2 'Анимация окна справа налево.
    'Этот флаг используется совместно с эффектами развёртывания и соскальзывания.
    Const AW_VER_POSITIVE = &H4 'Анимация окна сверху вниз.
    'Этот флаг используется совместно с эффектами развёртывания и соскальзывания.
    Const AW_VER_NEGATIVE = &H8 'Анимация окна снизу вверх.
    'Этот флаг используется совместно с эффектами развёртывания и соскальзывания.
    Const AW_CENTER = &H10 'Окно сворачивается внутрь себя если
    'установлен флаг AW_HIDE, иначе разворачивается
    Const AW_HIDE = &H10000 'Скрывает окно, по умолчанию окно появляется.
    Const AW_ACTIVATE = &H20000 'Активизирует окно.
    Const AW_SLIDE = &H40000 'Устанавливает эффект соскальзывания.
    'По умолчанию эффект развёртывания.
    Const AW_BLEND = &H80000 'Эффект постепенного появления.
    'Применяется только к окнам верхнего уровня.

    Private Sub Form_Load()
    Me.AutoRedraw = True
    Me.Print "Закрой меня"
    End Sub
    Private Sub Form_Unload(Cancel As Integer)
    'Анимация окна
    AnimateWindow Me.hwnd, 200, AW_VER_POSITIVE Or AW_HOR_NEGATIVE Or AW_HIDE
    'Выгружаем форму полностью
    Set Form1 = Nothing
    End Sub

    'Оригинальная версия примера расположена на сайте http://rusproject.newmail.ru

    наверх


    Использование InputBox для ввода секретной информации

    Хотите использовать стандартный InputBox для ввода информации, скрытой звездочками? Нет проблем, сказал один из программистов, и создал для вас этот пример. В этом примере вам понадобится дополнительный модуль

    'КОД ФОРМЫ

    Private Sub Command1_Click()
    Dim ret As String
    ret = InputBoxEx("Наберите пароль:", "Программа...")
    Label1 = ret
    End Sub

    'КОД МОДУЛЯ

    Option Explicit
    Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
    Private Declare Function SetTimer Lib "user32" (ByVal hWnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long
    Private Declare Function KillTimer Lib "user32" (ByVal hWnd As Long, ByVal nIDEvent As Long) As Long
    Private Declare Function GetCurrentThreadId Lib "kernel32" () As Long
    Private Declare Function UnhookWindowsHookEx Lib "user32" (ByVal hHook As Long) As Long
    Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
    Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

    Private Const WH_CBT = 5
    Private Const HCBT_ACTIVATE = 5
    Private m_lMsgHandle As Long
    Private m_lhHook As Long
    Private Const ES_CENTER = &H1&

    Private Function GetMessageBoxHandle(ByVal lMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
    If lMsg = HCBT_ACTIVATE Then
    m_lMsgHandle = wParam
    UnhookWindowsHookEx m_lhHook
    m_lhHook = 0
    End If
    GetMessageBoxHandle = False
    End Function

    Private Sub InputBoxTimerUpdateEvent(hWnd As Long, uiMsg As Long, idEvent As Long, dwTime As Long)
    Dim res As Long
    If m_lMsgHandle = 0 Then Exit Sub
    res = FindWindowEx(m_lMsgHandle, 0, "Edit", "")
    SendMessage res, 1052, 42, ByVal 0&
    SendMessage res, &H441, ES_CENTER, ByVal 0&
    End Sub

    Public Function InputBoxEx(sMsgText As String, Optional sTitle As String = "Secured InputBox") As String
    Dim lTimerUpdate As Long
    m_lhHook = SetWindowsHookEx(WH_CBT, AddressOf GetMessageBoxHandle, App.hInstance, GetCurrentThreadId())
    lTimerUpdate = SetTimer(0, 0, 0, AddressOf InputBoxTimerUpdateEvent)
    InputBoxEx = InputBox(sMsgText, sTitle)
    KillTimer 0, lTimerUpdate
    End Function

    наверх


    Прилипание формы к границам экрана

    Данный пример покажет, как ваша форма автоматически "прилипает" к границам экрана

    Создайте стандартный пример. В свойствах формы укажите:

    Borderstyle="0" - None
    ScaleMode = 3 - Pixel

    Private Declare Function GetCursorPos Lib "user32" (lpPoint As PointAPI) As Long
    Private Type PointAPI
    X As Long
    Y As Long
    End Type
    Dim Pos As PointAPI
    Dim A As Boolean
    Dim B As Boolean
    Dim C As Boolean
    Dim D As Boolean
    Dim SX As Integer
    Dim SY As Integer
    Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    SX = X
    SY = Y
    End Sub
    Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    GetCursorPos Pos
    If Not Button = vbLeftButton Then Exit Sub
    If Pos.X - SX >= 10 Then A = False
    If Pos.X - SX <= 10 Then Left = 0: A = True
    If Pos.Y - SY >= 10 Then B = False
    If Pos.Y - SY <= 10 Then Top = 0: B = True
    If Pos.X - SX <= Screen.Width / Screen.TwipsPerPixelX - Width / Screen.TwipsPerPixelX - 10 Then C = False
    If Pos.X - SX >= Screen.Width / Screen.TwipsPerPixelX - Width / Screen.TwipsPerPixelX - 10 Then Left = Screen.Width - Width: C = True
    If Pos.Y - SY + Height / Screen.TwipsPerPixelY > Screen.Height / Screen.TwipsPerPixelX - 10 Then Top = Screen.Height - Height: D = True
    If Pos.Y - SY + Height / Screen.TwipsPerPixelY <= Screen.Height / Screen.TwipsPerPixelX - 10 Then D = False
    If B = True Then GoTo Cya
    If D = True Then GoTo Cya
    Top = Pos.Y * Screen.TwipsPerPixelY - SY * Screen.TwipsPerPixelY
    Cya:
    If A = True Then Exit Sub
    If C = True Then Exit Sub
    Left = Pos.X * Screen.TwipsPerPixelX - SX * Screen.TwipsPerPixelX
    End Sub
    'Автор этого проекта Беляев Данила outen@mail.ru

    наверх


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

    BalloonMessage for MS Agent

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

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

    наверх


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

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

    Вопросы:


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

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

       Доброго всем времени суток. Есть у меня такой вопрос: в процессе программы открывается MediaPlayer строкой Shell path+file, vbMaximized, а как сделать автозакрытие MediaPlayer'a при закрытии программы ?


    Автор вопроса: Evgenia Vychub

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

       После изменения данных в ADO, подключенного к базе данных в Access, и update'a как определить, произошла ли физическая запись данных на диск? Проблема в том, что если тут же использовать такой же запрос из другого ADO, то приходят старые данные. А обновленные - со значительной задержкой по времени. Кто-нибудь сталкивался с такой проблемой?


    Автор вопроса: Алексей

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

       Слушайте, а как может программа, написанная в Visual Basic узнать подключены ли мы сейчас к Internet и разорвать подключение, когда уже истекло время.


    Автор вопроса: Саша

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

       Так я яаписываю в INI-файл

    Dim Path As String
    Path = App.Path & "\config.ini"
    p = WritePrivateProfileString("www", "w1", "30", Path)

    Все работает

    А этим кодом я пытаюсь считать от туда данные, но нечего не выходит. Кто яанет почему ?

    Dim Path As String
    Path = App.Path & "\config.ini"
    p = GetPrivateProfileString("www", "w1", "", "", 300, Path)


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

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

       Как программно очистить корзину?


    Автор вопроса: Алексей

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

       Помогите. Как мне перебрать все формы в интрефейсе MDI, а то черея оператор For Each и чего не выходит?


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

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

       Как в панели задач определить:
    1. Её положение (сверху, снизу, слева, справа)
    2. тип отображения (постоянно, автоматически убирать с экрана)
    3. вертикальный размер (Height).


    Автор вопроса: Николай

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

       Как получить список всех .ехе и .сом файлов с полным путём на VB 6.0


    Автор вопроса: Николай

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

       При работе в локальной сети есть ли возможность запускать программы на удалённой машине???


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

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

       Здравствуйте, подскажите пожалуйста, как удалить директорию (п-р: C:/Мои документы/Папка) из Excele?


    Автор вопроса: Vlad Lagutin

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

       подскажите , как подключить поле Базы Acsess тип поля OLE с объектом OLE в форме? (можно ли использовать word и html одновременно)


    Автор вопроса: Николай

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

       Имеется список запускающих файлов(.ехе),или "хандлов"(заголовков окон). Необходимо сделать так что бы при запуске какой либо программы из этого списка программа автоматически закрывалась а на рабочем столе появлялось окно сообщений. При наступлении определённого события (клик мышкой или при помощи таймера),программа проверяет все запущенные приложения и сверяет запускающий файл или "хендл" со списком,и если находит соответствие - закрывает эту программу. Примерно так,а вот как это реализовать на VB 6.0 в виде кода я не знаю. Я не хакер и не ламер,просто надоело что в рабочее время играют в игрушки.


    Автор вопроса: Дима

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

       Как в меню "Помощь" в раядел "О программе" добавить картинку, а также ссылку на домашнюю страничку автора и его e-mail.




    Ответы:


    Вопрос:

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

    Ответ:

    Автор ответа: P@Ssword

    Насколько я понимаю, программисты из MicroHard не сделали это стандартными средствами потому, что как бы в результате должен меняться hWnd окна, а изменения трудно перехватить.


    Вопрос:

       В VB есть такой control DataRepeater. Прочитал, что его можно использовать в качестве подчинённой формы (не ленточной, а именно подчинённой, как в Access), но нет документации как это сделать. Может кто-нибудь знает?

    Ответ:

    Автор ответа: Sergey Y. Tkachev

    Могу дать только намек. Дата репитер может являться контейнером для одного контрола, который он размножает, как и ленточная форма Аксеса. Для этого тебе нужно сделать свой ActiveX (например два текстовых поля, чекбокс, комбобокс) и уже его положить на репитер.


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

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

    наверх


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

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


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

    В избранное