| ← Март 2003 → | ||||||
|
1
|
2
|
|||||
|---|---|---|---|---|---|---|
|
4
|
5
|
6
|
8
|
9
|
||
|
11
|
12
|
13
|
14
|
15
|
||
|
18
|
19
|
20
|
22
|
23
|
||
|
25
|
26
|
27
|
29
|
30
|
||
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://vbnet.ru
Открыта:
31-07-2001
Статистика
0 за неделю
Visual Basic: новости сайтов, советы, примеры кодов. Выпуск 142.
| Информационный Канал Subscribe.Ru |
Visual Basic: новости сайтов, советы, примеры кодов.
Выпуск 142.
|
VBNet
VBMania
Голосование: Ссылки: |
Господа!!! читайте MSDN!!! Несколько слов от автора:
Очередной выпуск рассылки.
Читайте! Содержание выпуска
Книги
Остальные книги о VB можно найти здесь. наверх Citycat by Email Программа Citycat by Email позволяет работать с сервером Subscribe.ru с помощью электронной почты. Теперь Вам не нужно тратить деньги на работу в online и просматривать мегабайты рекламы для того, чтобы подписаться на нужную рассылку! Вам просто необходимо скачать небольшую базу данных по всем рассылкам каталога с нашего сайта, после чего Вы сможете подписываться и отписываться от рассылок, заказывать архивы прошлых выпусков, выполнять поиск по каталогу рассылок и многое другое. Программу Citycat by Email можно бесплатно загрузить с сайта http://sapisoft.h1.ru. наверх Новости сайта VBNet
Последние 20 тем форума на VBNet.Ru: 22:08 / 9 мар. vb.net | Хитов: 16 | Ответов: 1 22:07 / 9 мар. Что заменяет FileListBox и DirListBox? | Хитов: 17 | Ответов: 3 19:12 / 9 мар. Работа с form ? | Хитов: 26 | Ответов: 2 15:06 / 9 мар. Проверьте | Хитов: 16 | Ответов: 0 14:49 / 9 мар. А DirectX? | Хитов: 14 | Ответов: 1 12:15 / 9 мар. Посоветуйте книгу по VB | Хитов: 25 | Ответов: 3 11:56 / 9 мар. Новое сообщение без темы | Хитов: 8 | Ответов: 1 11:46 / 9 мар. Командная строка | Хитов: 16 | Ответов: 3 09:26 / 9 мар. Как изменить цвет статус-бара ? | Хитов: 14 | Ответов: 2 08:45 / 9 мар. Чат | Хитов: 14 | Ответов: 0 06:14 / 9 мар. Экранная заставка | Хитов: 26 | Ответов: 4 21:53 / 8 мар. инсталяшка | Хитов: 30 | Ответов: 4 16:56 / 8 мар. TreeView | Хитов: 29 | Ответов: 5 11:10 / 8 мар. Как сделать так, чтобы окно нельзя было изменит... | Хитов: 39 | Ответов: 6 11:05 / 8 мар. Как перехватить закрытие программы ? | Хитов: 21 | Ответов: 2 09:15 / 8 мар. t | Хитов: 12 | Ответов: 0 04:38 / 8 мар. ActiveX ishe odyn | Хитов: 4 | Ответов: 0 21:25 / 7 мар. ActiveX...GRRRR | Хитов: 13 | Ответов: 6 16:35 / 7 мар. Только для девчонок, мальчишки могут смотреть т... | Хитов: 65 | Ответов: 7 15:03 / 7 мар. Q: большие и маленькие в MS Access | Хитов: 22 | Ответов: 1 Последние поступления в Библиотеку кодов: Новости от VBNet-чиков!: наверх Новости сайта VBMania
наверх Новости сайта Азбука VB
наверх Новости сайта MSDN наверх Новости сайта GotdotNet Новые статьи: наверх Новости сайта dotSite Новые статьи: Новые примеры: наверх Где взять декампилятор для VB Вопрос: Автор вопроса: AQUALITY Где взять декампилятор для VB? Очень нужен !!! Ответы: Автор: Ян Я видел декомпилятор для прог, написанных на VB3, а декомпилятор программ на VB4 и выше, вроде не существует:( Автор: paul_sn СЯ слышал есть что декомпилятор для VB5. Но говорят что почти все существующие декомпиляторы коряво работают. Изначальный код получить практически невозможно Автор: AGReSSoRs decompiljator estj tolko dla vb3!!! sam ego juzal no frm on ne decompiliruet nomano tolko bas i drugie mono prosmotretj!! Автор: Stick Нормального Декомпилятора для VB НЕТ и не будет. Хотя если Microsoft включили его в VB.NET То еще Можно понадеется на VB 8.0. Хотя я думаю, что врят(д)ли. А еще где-то есть статья про то что, якобы, декомпилятор из VB.NET можно переделать для VB разных версий... Хотя, опять же, врят(д)ли. P/S Только не надо спрашивать "Где Ты ЕЕ(статью) Видел???" - я не помню. Автор: JEDI ЕСТЬ Универсальный декомпилятор но он декомпилит в код АСМА, а это врдяли те поможет Автор: Иван Как это переделать декомпилятор VB .NET для других версий???? VB .NET же генерирует не р-код и не машинный код, а JIT код! Это промежеточный код, который компилируется при запуске проги, как в JAVA!!! Это же совсем другой код! Переделать никак нельзя. Автор: SeMa A decompilyator kagis tolko do VB3 tak kak v vb3 kod i ne compilirovalsa on prosto bil zashit v EXE i eto exe evo translirovalo a decompilyator tolko vityagivaet cod s exehi (vrode) vot takto ... Автор: msv У меня где-то был декомпилятор для VB6 (в исходниках). Но вот одна проблема - основной язык его - французский (но есть и инглиш) Автор: Диман Идеальный декомпилятор - Notepad! Автор: Страшный Сон Notepad - это всё тот же асм. наверх Доска объявлений Ищу телеработу.
наверх Мои программы BalloonMessage for MS Agent BalloonMessage for Microsoft Agent реализует диалог программы с
пользователем, используя при этом технологию Microsoft Agent. OCX реализует три
типа диалоговых окон: InputBox, MsgBox и MsgLabels. Авторы: Шатрыкин Иван и Павел Сурменок. наверх Вопрос/Ответ Здесь Вы можете задать вопрос, или ответить на уже имеющиеся вопросы. Вопросы:Автор вопроса: MC Green Ответ ожидается по этому адресу Какие есть API-функции для работы с *.ini файлами (если можно, пример кода) Автор вопроса: CV Ответ ожидается по этому адресу Как в VB написать драйвер, работающий с LPT портом ? И если возможно вставить ассемблерные коды. Автор вопроса: 001 Ответ ожидается по этому адресу Как размещать GIF-анимировыанные картинки на форме? Я пробовал Image, PictureBox, но ничего не помогает. Может кто-нибудь знает? Автор вопроса: leonxl Ответ ожидается по этому адресу Есть у кого-нибудь исходники обычного Scroller'а??? Если не в лом, мыльте: leonxl@vpcit.ru Автор вопроса: Melkor Ответ ожидается по этому адресу В процессе работы программы создается текстовый файл событий. Можно ли как-нибудь его зашифровать? Автор вопроса: Лёха Ответ ожидается по этому адресу Может кто знает как изменить значок папки? Простое создание\копирование файла Desktop.ini не помогает. Автор вопроса: P@Ssword Ответ ожидается по этому адресу Пипл, что за оператор такой - LSet? Автор вопроса: P@Ssword Ответ ожидается по этому адресу Как после испольяования CryptHashData получить этот самый хэш, а не его handler? Автор вопроса: Леонид И Карлов Ответ ожидается по этому адресу Приобретал несколько CD с бэйсиком 6, ни один из них не хочет работать на моём компьютере. Инсталяция нормально, а потом сообщение "программа выполнила недопустимую операцию и будет закрыта" это сообщение либо после попытки сохранить пустую форму, либо при помещении на форму кнопки и попытке сохранить (пустую форму и проект некоторые крмпакты сохраняют). Не встречалась такая ситуация? Как с ней бороться? Кстати 5 Бэйсик пашет во всю... Ответы: Вопрос: Вот такой вопрос: в текстбоксе есть определенный текст. Так вот что требуется: если первые 6 символов соответсвуют образцу (например If six number = "sobaka" Then) то будет происходить какое-то действие. Как это осуществить? Ответ: Автор ответа: Mind Engine A language reference полистать влом? ok = "sobakadrugcheloveka" If ok Like "sobaka*" Then MsgBox "Попадос!" Ответ: Автор ответа: Роман If Right$("переменная",6)="sobaka" then ... Ответ: Автор ответа: DeDMoRoZ Размещаеш на форме TextBox и Кнопку. Для кнопки на событие он_клик пишиш следующие: Dim ss, sss As String ss = Text1.Text sss = Mid(ss, 1, 6) if sss = "sobaka" then MsgBox sss else msgbox "Не собака !!!" end if Ответ: Автор ответа: leonxl Легко и просто: if Left$ (txtTextBox1.text, 6) = "Образец" then ... Ответ: Автор ответа: Дмитриев Николай Все делается ну очень просто! Имеется TextBox и некий фрагмент текста там, чтобы получить первые шесть символов из строки пользуемся функцией MID$(строка, начальный символ, конечный символ), на примере это выглядит так: Private Sub Command1_Click() ' получаем первые шесть символов и сравниваем их с образцом в нижнем регистре If LCase(Mid$(Me.Text1.Text, 1, 6)) = "sobaka" Then ' тут прописываем ссылку на действия или сами действия в случае истины MsgBox "Hello!" ' тут выскакивает мессаж ПРИВЕТ (по англицки) Else ' : прописываем действия при отрицательном результате, или убераем оператор Else End If End Sub Ответ: Автор ответа: ]CBK[CRaSH if MID(str,1,6)="123456" then msgbox "Est" Mid(строка,начальный символ,скока символов)=Строка Ответ: Автор ответа: MaxOn Private Sub Text1_Change() Static slovo As String Static alltxt As String slovo = "собака" alltxt = Text1.Text If Left(alltxt, Len(slovo)) = slovo Then MsgBox "Вы написали" & slovo End Sub Ответ: Автор ответа: Tibor if mid(textbox1.text, 1, 6) = "sobaka" then .... Вопрос: Как на VB6 из буфера обмена извлечь только URL и вставить его в ListBox без кнопок. Ответ: Автор ответа: ]CBK[CRaSH Ты можешь извлечь все данные, а потом найти в старке нужный URL Вопрос: Кто может мен расказать как объщаться с ИК портом (USB) с помощью VB! Ответ: Автор ответа: Александр Ищу ответ на Ваш вопрос и не только я. если вы где то встретите решение дайте знать. Но знаю, что IRDA соединение может решаться чачстично через Comport, но под NT кажется не работает Слышал, что все работает через Socket, Но как понятия не имею. Вопрос: Люди, кто-нибудь знает как сделать инсталляшку IE5.5 раямером 4-7м. все 70м таскать неохота изза простого юзания пары файликов типа mshtml.dll да shdocvw.dll. просто заменить их не канает - форты умирают :-) Ответ: Автор ответа: Tibor Foton Basic Compiler - компилятор базика. Компилирует макросы написаные на SAX BASIC в exe файлы. Размер файла от 3Kb Вопрос: Какие есть API-функции для работы с *.ini файлами (если можно, пример кода). Ответ: Автор ответа: DeDMoRoZ Вот тебе текст модуля: Declare Function GetPrivateProfileString Lib _ "kernel32" Alias "GetPrivateProfileStringA" _ (ByVal lpApplicationName As String, ByVal lpKeyName _ As Any, ByVal lpDefault As String, ByVal lpReturnedString _ As String, ByVal nSize As Long, ByVal lpFileName As String) As Long Declare Function WritePrivateProfileString Lib _ "kernel32" Alias "WritePrivateProfileStringA" _ (ByVal lpApplicationName As String, ByVal lpKeyName _ As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long Public Function LoadINI(sInifile As String, sSection As String, _ sKey As String, sDefault As String) As String Dim sTemp As String * 256 Dim nLength As Integer sTemp = Space$(256) nLength = GetPrivateProfileString(sSection, _ sKey, sDefault, sTemp, 255, sInifile) LoadINI = Left$(sTemp, nLength) End Function Public Sub SaveINI(sInifile As String, sSection As String, _ sKey As String, sValue As String) Dim n As Integer Dim sTemp As String sTemp = sValue For n = 1 To Len(sValue) If Mid$(sValue, n, 1) = vbCr Or Mid$(sValue, n, 1) = vbLf _ Then Mid$(sValue, n) = " " Next n n = WritePrivateProfileString(sSection, sKey, sTemp, sInifile) End Sub Функция SaveINI отвечает за запись в ИНИ файл параметры соответственно. Путь и имя файла, Секция, Ключ, Значение. Функция LoadINI отвечает за чтение из ИНИ файла параметры соответственно. Путь и имя файла, Секция, Ключ, Значение. Можете заполнить эту форму, либо отослать вопрос СЮДА Форма для добавления нового вопроса в этот раздел. Информация отсылается по E-mail владельцу сайта. |
|||||||||||||||||||||||||||||||||||
Выпуск подготовили: |
Сурменок Павел | |||||||||||||||||||||||||||||||||||
| http://subscribe.ru/
E-mail: ask@subscribe.ru |
Отписаться
Убрать рекламу |
| В избранное | ||
