| ← Март 2002 → | ||||||
|
2
|
3
|
|||||
|---|---|---|---|---|---|---|
|
5
|
6
|
7
|
9
|
10
|
||
|
12
|
13
|
14
|
16
|
17
|
||
|
19
|
20
|
21
|
23
|
24
|
||
|
26
|
27
|
28
|
30
|
31
|
||
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://vbnet.ru
Открыта:
31-07-2001
Автор
Статистика
4.063 подписчиков
0 за неделю
0 за неделю
Visual Basic: новости сайтов, советы, примеры кодов. Выпуск 40.
Visual Basic: новости сайтов, советы, примеры кодов.
Выпуск 40.
|
VBNet
VBMania
Голосование: Нет тем! Доска почёта: Sergey Y. Tkachev Кононенко Роман Kirill Sergey Sapozhnikov Sobic Ссылки: |
Господа!!! читайте MSDN!!! Несколько слов от автора:
Новый сороковой выпуск рассылки.
Читайте! Содержание выпуска
Книги
Остальные книги о VB можно найти здесь. наверх Citycat by Email Программа Citycat by Email позволяет работать с сервером Subscribe.ru с помощью электронной почты. Теперь Вам не нужно тратить деньги на работу в online и просматривать мегабайты рекламы для того, чтобы подписаться на нужную рассылку! Вам просто необходимо скачать небольшую базу данных по всем рассылкам каталога с нашего сайта, после чего Вы сможете подписываться и отписываться от рассылок, заказывать архивы прошлых выпусков, выполнять поиск по каталогу рассылок и многое другое. Программу Citycat by Email можно бесплатно загрузить с сайта http://sapisoft.h1.ru. наверх Новости сайта VBNet
Последние 20 тем форума на VBNet.Ru: 23:53 / 16 мар. Api | Ответов: 1 22:19 / 16 мар. Курсовая горит | Ответов: 1 21:59 / 16 мар. Новое сообщение без темы | Ответов: 1 23:14 / 15 мар. Как свернуть чужую прогу(игру)??? | Ответов: 1 23:07 / 15 мар. Помогите!!! | Ответов: 0 22:15 / 15 мар. audio | Ответов: 1 22:13 / 15 мар. Audio | Ответов: 1 20:51 / 15 мар. декомпилятор | Ответов: 0 15:56 / 15 мар. inpout.dll - помогите делетанту в vb | Ответов: 0 11:56 / 15 мар. Есть ли контрол для визуализации графа? | Ответов: 1 09:31 / 15 мар. Поле Runtime | Ответов: 0 06:22 / 15 мар. сохранение bmp | Ответов: 1 06:20 / 15 мар. Новое сообщение без темы | Ответов: 1 01:07 / 15 мар. ВСЕМ !!! найдена прикольная прога ! | Ответов: 1 21:47 / 14 мар. Удаление из ListBox | Ответов: 1 18:19 / 14 мар. Преоброзование типа данных | Ответов: 1 16:32 / 14 мар. проблема решена, всем спасибо =)) | Ответов: 0 16:31 / 14 мар. AutoCad & Visual Basic | Ответов: 1 15:44 / 14 мар. из Listbox'а в массив | Ответов: 0 15:37 / 14 мар. помощь по lpt порту | Ответов: 1 Последние поступления в Библиотеку кодов: Нет новых кодов. наверх Новости сайта VBMania
наверх Новости сайта Азбука VB
наверх Доска объявлений Ищу телеработу.
наверх Мои программы BalloonMessage for MS Agent BalloonMessage for Microsoft Agent реализует диалог программы с
пользователем, используя при этом технологию Microsoft Agent. OCX реализует три
типа диалоговых окон: InputBox, MsgBox и MsgLabels. Автор: Шатрыкин Иван. Соавтор: Павел Сурменок. наверх Вопрос/Ответ Здесь Вы можете задать вопрос, или ответить на уже имеющиеся вопросы. Вопросы:Автор вопроса: Вася Ответ ожидается по этому адресу Подскажите пожалуйста, вояможно ли вообще в MS Access 2000 программно ия .mdb сделать .mde файл баяы данных? И если можно, то как? Автор вопроса: НикАндр Ответ ожидается по этому адресу как сделать что бы в text1.text происходил поиск слов которые ты написал и изменялся, например цвет, размер итд в нём же самом для создания HTML редактора Автор вопроса: Ewgeniy Ответ ожидается по этому адресу Существует ли декомпилятор для Visual Basica? Автор вопроса: Саша Ответ ожидается по этому адресу Когда яапускаешь программу под Dos. Открывается окно Dos и пишутся раяличные надписи (у большенства программ) Как сделать так что бы эти яаписи были на TextBox. Автор вопроса: Андрей Ответ ожидается по этому адресу В Excel 2000 при копировании листа Sheets("Name").Copy After:="NameA" где-то на 26-31-й копии возникает ошибка #1004 и лист не копируется. Что это за глюк? Как с ним бороться? Пока обхожу его так: в обработчике ошибки всавляю новый лист, переношу на него все данные, задаю нужные параметры печати. Но это требует НА ПОРЯДОК БОЛЬШЕ ВРЕМЕНИ! Автор вопроса: Tibor Ответ ожидается по этому адресу Ноты!!! как через Win32Api в VB6 прописать звук? Длительность, тональность, и т.п. и т.д. Автор вопроса: Алексей Ответ ожидается по этому адресу Допустим, я взял какую-то картинку и поместил её в Picture Box. Допустим, она может быть значительно больше этого самого окошка Picture. Допустим, я реализовал скроллы, фреймы и всякие инструменты для интерактивной обработки. Всё нормально и работает. Но вопрос - как можно получить информацию о скрытых частях картинки. Метод Point работает только для видимой части картинки и формы, а нужно иметь инфо о любой точке изображения. Ответ, конечно, прост - параллельно с выводом в PictureBox считывать информацию прямо из файла. А потом во время работы это дело коррелировать. Вопрос, существуют ли какие-нибудь доступные прилады и библиотеки для чтения файлов в различных граф. форматах, чтобы можно было получить попиксельную информацию? Или есть методы в VB, с помощью которых можно обойти это дело? Или что-то третье? Автор вопроса: Андрей Щёкин Ответ ожидается по этому адресу 1. Спрашивается, как работать с RAS ? 2. Для работы с сервисами NT(XP) в MSDN есть такой кусок. hNextUnreadEntry = 0 '* lngResult = EnumServicesStatus(hSCM, SERVICE_WIN32, SERVICE_ACTIVE, ByVal &H0, _ &H0, lngBytesNeeded, lngServicesReturned, hNextUnreadEntry) 'We should receive MORE_DATA error. If Not Err.LastDllError = ERROR_MORE_DATA Then MsgBox "LastDLLError = " & CStr(Err.LastDllError) Exit Sub End If 'Calculate the number of structures needed. lngStructsNeeded = lngBytesNeeded / Len(lpEnumServiceStatus(0)) + 1 'Redimension the array according to our calculation. ReDim lpEnumServiceStatus(lngStructsNeeded - 1) 'Get buffer size in bytes. lngServiceStatusInfoBuffer = lngStructsNeeded * Len(lpEnumServiceStatus(0)) 'Get services information starting entry 0. hNextUnreadEntry = 0 '** lngResult = EnumServicesStatus(hSCM, SERVICE_WIN32, SERVICE_ACTIVE, lpEnumServiceStatus(0), lngServiceStatusInfoBuffer, lngBytesNeeded, lngServicesReturned, hNextUnreadEntry) Но в таком виде первый EnumServicesStatus (*) выдаёт ошибку на ByVal &H0 - User-defined type can't be passed ByVal. Если создать второе обьявление той же функции с Long в этом месте, то прога (вместе с VB) вылетает на вызове исходной (**). В чём дело ? Автор вопроса: Spart51 Ответ ожидается по этому адресу Как сделать, чтобы программа добавлялась в автозагрузку(не через меню "Автозагрузка", а в реестре)? Автор вопроса: Сергей Ответ ожидается по этому адресу Как можно на VB, если можно, использовать ресурсы динамических библиотек (DLL файлов), например: иконки, диалоги, меню, и т.д. Да, подскажите пожалуйста где можно найти статью по созданию DLL на VB6. Ответы: Вопрос: Как на форме VB6 создать подчинённую форму для отображения данных из таблицы связанной с главной отношением "один-ко-многим"? (Наподобие подчинённой формы в ACCESS) Ответ: Автор ответа: Shemyakin, Dmitry К сожалению в ВБ все придется делать ручками. Если нужно подчиненную таблицу представить в табличной форме - все достаточно просто - используй подходящий контрол list или grid. Если нужно самому оформлять таблицу, со всевозсожными контролами - надо заморачиваться и писать код, динамически добавляющий контролы на форму. Вопрос: Что бы послать почту с моей Form пишу: 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 Declare Function GetDesktopWindow Lib "user32" () As Long Private Sub Label1_Click() 'Выяываем маил с адресом Call ShellExecute(0&, "Open", "mailto:" + "ЛОГИН@СЕРВЕР.ru" + "?Subject=" + "'Здесь описана тема...'" + "?body=" + "'Сдесь нужно написать сообщение'", "", "", SW_SHOWNORMAL) End Sub Но в почтовой программе текст 'Сдесь нужно написать сообщение' выводится там где вводится тема. Помогите сделать так чтобы в текстовом поле ияображалать текст Ответ: Автор ответа: Михаил Ю. Белодед Call ShellExecute(0&, "Open", "mailto:" + "ЛОГИН@СЕРВЕР.ru" + "?Subject=" + "'Здесь описана тема...'" + "&body=" + "'Сдесь нужно написать сообщение'", "", "", SW_SHOWNORMAL) Вопрос: Что бы послать почту с моей Form пишу: 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 Declare Function GetDesktopWindow Lib "user32" () As Long Private Sub Label1_Click() 'Выяываем маил с адресом Call ShellExecute(0&, "Open", "mailto:" + "ЛОГИН@СЕРВЕР.ru" + "?Subject=" + "'Здесь описана тема...'" + "?body=" + "'Сдесь нужно написать сообщение'", "", "", SW_SHOWNORMAL) End Sub Но в почтовой программе текст 'Сдесь нужно написать сообщение' выводится там где вводится тема. Помогите сделать так чтобы в текстовом поле ияображалать текст Ответ: Автор ответа: Александр Все дело в том что у вас получается след вызываемая комманда: mailto:ЛОГИН@СЕРВЕР.ru?Subject=описана тема...?body=Сдесь нужно написать сообщение между subj и body должен быть знак (& - амперсанд) иначе ничего работать небудет! Вопрос: Как уянать какая клавеша нажата если forma не активна. Например: в каком либо редакторе нажимается какая либо кнопка а Forma обрабатывает это нажатие Ответ: Автор ответа: Kirill Абсолютно исчерпывающий ответ можно найти здесь: http://www.vbrussian.com/Tricks/API.asp#a1 Вопрос: Если на VB написать прогу и записать на болванку, чтобы она запускалась при запуске сидюка. Понятно в основном. так а если на машине не библиотек VB она же не запуститься? проверку можно сделать и если нет библиотек, то их копирнуть тут же. во как завернул? Ответ: Автор ответа: Иван Проще сделать по другому: На диске создаёшь файл Autorun.inf, пишешь туда текст: [autorun] OPEN=/путь/файл.exe В папку путь положи свой проект вместе с библиотеками и всё будет работать. Вопрос: Если на VB написать прогу и записать на болванку, чтобы она запускалась при запуске сидюка. Понятно в основном. так а если на машине не библиотек VB она же не запуститься? проверку можно сделать и если нет библиотек, то их копирнуть тут же. во как завернул? Ответ: Автор ответа: Sobic Надо просто пихнуть все необходимые библиотеки в корневой каталог твоего CD. Ведь как ты проверишь есть ли библиотеки на машине? Напишешь другую прогу на другом языке программирования? Вопрос: Как, например, по нажатии кнопки, запускался файл .mp3 Ответ: Автор ответа: Иван В разделе формы General Declarations объявляем следующую API-функцию: Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long 'чтобы воспроизвести файл Private Sub Command2_Click() Call mciExecute("play d:\Music01.mp3") End Sub 'чтобы закрыть файл Private Sub Command1_Click() Call mciExecute("close d:\Music\01.mp3") End Sub Вопрос: Как, например, по нажатии кнопки, запускался файл .mp3 Ответ: Автор ответа: Post Можно воспользоваться Windows Media Player. Помещаешь его на форму (components ---> Windows Media Player) В процедуре обработки нажатия вводишь код Private Sub Комманда1_Click() MediaPlayer1.FileName = "полный путь к mp3" MediaPlayer1.Play End Sub Можете заполнить эту форму, либо отослать вопрос СЮДА Форма для добавления нового вопроса в этот раздел. Информация отсылается по E-mail владельцу сайта. |
||||||||||||||||||||||||||||||||
Выпуск подготовили: |
Сурменок Павел |
| http://subscribe.ru/
E-mail: ask@subscribe.ru |
Отписаться
Убрать рекламу |
| В избранное | ||
