VBNet
VBMania
Голосование: Нет тем! Доска почёта: Sergey Y. Tkachev Кононенко Роман Kirill Sergey Sapozhnikov Sobic Ссылки: |
Господа!!! читайте MSDN!!! Несколько слов от автора:
Новый 68-ой выпуск рассылки!!!
Читайте! Содержание выпуска
Книги
Остальные книги о VB можно найти здесь. наверх Citycat by Email Программа Citycat by Email позволяет работать с сервером Subscribe.ru с помощью электронной почты. Теперь Вам не нужно тратить деньги на работу в online и просматривать мегабайты рекламы для того, чтобы подписаться на нужную рассылку! Вам просто необходимо скачать небольшую базу данных по всем рассылкам каталога с нашего сайта, после чего Вы сможете подписываться и отписываться от рассылок, заказывать архивы прошлых выпусков, выполнять поиск по каталогу рассылок и многое другое. Программу Citycat by Email можно бесплатно загрузить с сайта http://sapisoft.h1.ru. наверх Новости сайта VBNet
Последние 20 тем форума на VBNet.Ru: 04:22 / 23 июн. add button to IE's toolbar | Ответов: 1 21:56 / 22 июн. Новое сообщение без темы | Ответов: 3 21:44 / 21 июн. Active X | Ответов: 0 15:03 / 21 июн. Коллекция | Ответов: 2 14:32 / 21 июн. Как получить образ части экрана? | Ответов: 4 14:04 / 21 июн. Вопрос тем, кто знает, что такое DKOI-8... | Ответов: 1 13:01 / 21 июн. VB-прога как Explorer (ПРОБЛЕМА) | Ответов: 6 12:57 / 21 июн. Поиск слов, символов и т. д. | Ответов: 2 11:37 / 21 июн. VB & SNMP | Ответов: 0 11:19 / 21 июн. Книга жалоб и предложений | Ответов: 5 10:31 / 21 июн. Перевод бинарного файла в текстовый | Ответов: 1 10:17 / 21 июн. Передать ссылку на массив | Ответов: 6 06:20 / 21 июн. Как можно отправить е-mail ? | Ответов: 2 06:12 / 21 июн. Помогите, пожалуйста! | Ответов: 0 23:26 / 20 июн. Как сделать PopUp menu? | Ответов: 3 14:53 / 20 июн. Админам | Ответов: 0 14:44 / 20 июн. Проверка | Ответов: 2 12:51 / 20 июн. Элемент итипа Excel... | Ответов: 1 00:35 / 20 июн. Контролы графиков | Ответов: 1 23:07 / 19 июн. Чат | Ответов: 1 Последние поступления в Библиотеку кодов: наверх Новости сайта VBMania
наверх Новости сайта Азбука VB
наверх Доска объявлений Ищу телеработу.
наверх Мои программы BalloonMessage for MS Agent BalloonMessage for Microsoft Agent реализует диалог программы с
пользователем, используя при этом технологию Microsoft Agent. OCX реализует три
типа диалоговых окон: InputBox, MsgBox и MsgLabels. Автор: Шатрыкин Иван. Соавтор: Павел Сурменок. наверх Вопрос/Ответ Здесь Вы можете задать вопрос, или ответить на уже имеющиеся вопросы. Вопросы:Автор вопроса: ALEX Ответ ожидается по этому адресу Как спрятать программу в SysTray и сделать для не? там иконку? Автор вопроса: DedMorozzz Ответ ожидается по этому адресу У меня есть MDI форма, у которой есть дочерняя форма с расположенным на ней элементом Data. Мне нужно, чтобы при загрузке программы была видна только MDI форма. Но как только я присваиваю программным путем свойству DataBaseName какое-то значение, то дочерняя форма тут же выскакивает на экран. Как от этого избавиться? Автор вопроса: виктор Ответ ожидается по этому адресу Подскажите как остановить таймер,что бы он сработал один раз или два и остановился. Автор вопроса: samit Ответ ожидается по этому адресу Уважаемые программисты, подскажите каким способом лучше всего разбить ботьшой файл на маленькие, размером 1,44 Mb средствами VB 6.0 а затем их же склеить! Спасибо! Автор вопроса: samit Ответ ожидается по этому адресу Нужна помощь! У меня такой вопрос: в моей программе есть форма с настройками и при нажатии кнопки применить происходит следущее: Private Sub Command2_Click() If Check1.Value = 1 Then cbdend = 1 'открыть вначале работы If Check2.Value = 1 Then cbdtim = 1 'открыть в конце работы sbdh = Text2.Text 'имя sbdm = Text3.Text 'фамилия If Check3.Value = 1 Then arcpro = 1 'есть архив If Check4.Value = 1 Then arcend = 1 'нет архива pathbd = Text1.Text 'путь к файлам End Sub Вот так формируются переменные на основе моих настроек и как их теперь записать в файл "setup.ini" в дирректории моей программы, а потом считать их оттуда при следующей загрузке программы? Спасибо! Автор вопроса: Spart51 Ответ ожидается по этому адресу При записи информации в файл (методом Put) выводится сообщение "Неправильная длина строки" (если объём информации большой). Что делать? (И кто виноват? :) Автор вопроса: Сергей Ответ ожидается по этому адресу Подскажите пожалуйста, можно ли передать ссылку на массив (находящийся в программе) в раярабатываемый мною ActiveX Control, чтобы этот (именно_этот)массив был доступен в любых процедурах внутри Control? Автор вопроса: Виталий Венгров Ответ ожидается по этому адресу Как изменить яркость картинки ? В NT добиваюсь результата с помощью API- функций StretchBlt, SetStretchBltMode, GetColorAdjustment, SetColorAdjustment, GetStretchBltMode А в Win9x/ME функции GetColorAdjustment, SetColorAdjustment не поддерживаются. Кто нибудь знает как обойтись без них? Автор вопроса: Andrey Ответ ожидается по этому адресу Есть программка рассылки почты. Используется MAPI Controls 6.0. В Outlook Express работает идеально. В Outlook 2000 (не Express) некорректно пристегиваются аттачменты. Т.е. в объем сообщения они попадают, у себя в папке "Отправленные" я их открыть могу, а получатель после пересылки, у себя на машине - нет. Протокол соответственно SMTP. Если создавать сообщение вручную - все нормально. Автор вопроса: Vladimir Ответ ожидается по этому адресу Как можно с помощью MAPI Controls отправить письмо в формате HTML? Точнее Какой параметр нужен для MAPIMessages? Ответы: Вопрос: В Delphi есть Qreport есть ли что-то подобное в VB? Ответ: Автор ответа: DedMorozzz Да, в VB есть замечательный генератор отчетов Data Report. Для того, чтобы его добавить к проекту, нужно щелкнуть по проекту правой клавишей в окне с его структурой и выбрать Добавить -> Data Report. Еще понядобится Data Environment (добавляется также). Вопрос: Подскажите, как сделать чтобы на одной вкладке TabStrip была например кнопка, а на другой вкладке TextBox? Ответ: Автор ответа: Andrey Используй лучше Project-Components-Microsoft Tabbed Dialog Control Вопрос: Подскажите, как сделать чтобы на одной вкладке TabStrip была например кнопка, а на другой вкладке TextBox? Ответ: Автор ответа: Ted Пользуйся Microsoft Tabbed Dialog Control, в нем все проще. Вопрос: Kак добавить ярлык в деректорию "Создать" в меню Windows. Ответ: Автор ответа: Андрей Исаков CrystalReport. Даже в 5.0. На счет более раггих не знаю... Вопрос: ПОМОГИТЕ РАЗОБРАТЬСЯ С MSDN !!! У меня Visual Basic 6.0 и при попытке вызвать Справку выдает, что надо типа установить MSDN Library. Долго искал всеми расхваливаемый MSDN на CD-дисках и, наконец, купил Ответ: Автор ответа: StarLink (Grodno) Попробуй перед установкой MSDN удалить с диска файл hhcolreg.dat (он где-то в \windows\... лежит). Мне помогло. Вопрос: ПОМОГИТЕ РАЗОБРАТЬСЯ С MSDN !!! У меня Visual Basic 6.0 и при попытке вызвать Справку выдает, что надо типа установить MSDN Library. Долго искал всеми расхваливаемый MSDN на CD-дисках и, наконец, купил Ответ: Автор ответа: Андрей Исаков Поищи VisualStudio 98. На 6-ти CD. Вопрос: Как яяделать библеотеку так чтобы я набрав слово например abs. после точки выскочило меню с всеми процедурами и функциями. У меня получается так только когда я делаю Public классу и функции. Но мне не надо что бы это было Public , а только после набратия слова abs. Ответ: Автор ответа: Василий Шашенок Не совсем понял вопрос. Если ты делаешь библиотеку и перечень процедур и функций выскакивал при написании программы с этим модулем, то ничего кроме Public не могу посоветовать. Почему? А зачем в подсказке программисту нужны процедуры и функции, к которым он не может обратиться! Вопрос: 1. Купил мышь со скролингом (колёсико)-swen sww-18. Можно ли с помощью басика обрабатывать событие прокрутка колесика и нажатие на него? 2. Как выводить компьютер из спящего режима? Хочу сделать будильник. Ответ: Автор ответа: Duke Ну не знаю что на счет прокручивания но клик на него равен нажатию на среднюю клавишу т.е. если у тебя мышь не с колесом а с 3 кнопками то нажатие на колесо равно нажатию на среднею клавишу мыши пример: 'нужна форма и 1 лабел Private Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = vbMiddleButton Then MsgBox "", , "" End Sub Вопрос: Есть два TextBox. В каждом яаписывается какое-либо время. Например: TextBox1.text = "01:30:25" TextBox2.text = "02:01:30" Как вычислить TextBox2.text - TextBox1.text Может кто сталкивался с таким, подкиньте код пожалуйста. Бывает ли переменная типа Time (не timer) и каким обраяом проияводятся вычисления со временем? Ответ: Автор ответа: Vadim Воспользуйся функцией TimeValue(string).Она преобразует строку в тип Data. Присвой разницу переменной типа Date. Вопрос: Где в Инете можно скачать учебник для начинающего програмиста? Ответ: Автор ответа: Сергей Зайди на сайт http://softsware.narod.ru это сайт я недавно открыл и там вразделе "про Visual Basic" найдёшь архивы статей и учебников. Вопрос: Как на VB 6.0 написать программу для Windows 2000, которая меняла бы рисунок на рабочем столе? Ответ: Автор ответа: Сергей Добавьте на форму 2 CommandButton. Первая кнопка помещает на рабочий стол любой ваш рисунок, вторая - убирает этот рисунок. Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As String, ByVal fuWinIni As Long) As Long Const SPI_SETDESKWALLPAPER = 20 Private Sub Command1_Click() SystemParametersInfo SPI_SETDESKWALLPAPER, 0, "D:\Basic\tmpProj\Load.bmp", True 'Заменить путь D:\Basic\tmpProj\Load.bmp на нужный вам файл рисунка в формате bmp End Sub Private Sub Command2_Click() SystemParametersInfo SPI_SETDESKWALLPAPER, 0, 0, False End Sub Вопрос: Подскажите код как в VBA на форме поместить ссылку на E-mail или страничку. Ответ: Автор ответа: Сергей 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 Const SW_SHOW = 5 Call ShellExecute(0&, "Open", "mailto:" + softsware@narod.ru + _ "?Subject=" + "Re: VitalTime", "", "", 1) 'web Call Navigate(Me, "http://softsware.narod.ru/") Вопрос: Можно ли програмно вставить сообщение в папку "Исходящие" Outlook Express(не Microsoft Outlook!)? (VB6) Ответ: Автор ответа: A012@yandex.ru Используй Microsoft MAPI Control 6.0 Он вставляет сообщения в "Исходящие" текущего почтовика по default. Вопрос: Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл? Ответ: Автор ответа: Roman Yuakovlev ловить и парсить с помощью Command$... Вопрос: Как можно программу сделать невидимой для Ctrl+Alt+Delete Ответ: Автор ответа: Виталий Анисимов Private Declare Function GetCurrentProcess Lib "kernel32" () As Long Private Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long Const RSP_SIMPLE_SERVICE = 1 Const RSP_UNREGISTER_SERVICE = 0 Public Sub MakeMeService() 'Чтобы убрать вашу программу из списка Ctrl+Alt+Delete, используйте процедуру MakeMeService: Dim pid As Long Dim reserv As Long pid = GetCurrentProcessId() regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE) End Sub 'Чтобы показать вашу программу в списке Ctrl+Alt+Delete, используйте процедуру UnMakeMeService: Public Sub UnMakeMeService() Dim pid As Long Dim reserv As Long pid = GetCurrentProcessId() regserv = RegisterServiceProcess(pid, RSP_UNREGISTER_SERVICE) End Sub Private Sub Command1_Click() MakeMeService End Sub Private Sub Command2_Click() UnMakeMeService End Sub '--------------------------------------------------------------- 'Обязательно Private Sub Form_Unload(Cancel As Integer) UnMakeMeService End Sub '--------------------------------------------------------------- Обязательно Можете заполнить эту форму, либо отослать вопрос СЮДА Форма для добавления нового вопроса в этот раздел. Информация отсылается по E-mail владельцу сайта. |
|||||||||||||||||||||||||
Выпуск подготовили: |
Сурменок Павел |