VB.NET|Вконтакте I

Очередной пример работы с социальной сетью - Вконтакте

Что может :

  • Авторизовываться
  • Добавлять новые записи на свою стену

Загрузить проект

Автор : inv.DS

Некоторые изменения были сделаны мною.

VK Screen VB.NET|Вконтакте I

  Метки:
  Евгений
  Просмотров: 5 826
  Запись опубликована в 08:30

FastStart 1.0.0

Представляю сырую версию новой задумки.

FastStart - всплывающая панелька, которая будет хранит в себе самые нужные программы.

Выезжает из левого угла рабочего стола.

Функций пока не слишком много :

  • Горячие клавиши для трех программ
  • Настройка прозрачности
  • Добавление в автозагрузку
  • Изменение положения панели
  • Имеет три вкладки, вмещается всего 9 программ

FastStart FastStart 1.0.0

Загрузить программу

За исходником в комментарии.

  Метки:
  Евгений
  Просмотров: 3 196
  Запись опубликована в 14:05

Браузер на WebKit

Многим наверно не нравиться стандартный контрол WebBrowser на базе IE, потому что выскакивают разные ошибки при загрузке веб страницы и не слишком быстро загружаются страницы, как хотелось бы.

Сегодня мы напишем браузер используя контрол WebKitBrowser.

Скачать WebKit.NET(13.3 мб)

Tutorial WebKit.NET

Теперь создайте новый проект, сохраните его на компьютере.

Извлеките архив.

Содержание архива :

Kit1 Браузер на WebKit

Подробнее »

  Метки:
  Евгений
  Просмотров: 15 477
  Запись опубликована в 06:34

Цвет пикселя на изображении

Получаем цвет пикселя и применяем его.

Код написать для события MouseClick у PictureBox.

Dim bmp As Bitmap = New Bitmap(PictureBox1.Image) ' Создаем новый рисунок
Label1.ForeColor = Color.FromArgb(bmp.GetPixel(e.X, e.Y).ToArgb) ' Получаем цвет точки пикселя в этом рисунке
Label1.Text = "Цвет - " & Label1.ForeColor.ToString ' Выводи цвет в формате ARGB

Запустите проект, кликните мышкой на нужную область в PictureBox

PenImage Цвет пикселя на изображении

  Метки:
  Евгений
  Просмотров: 7 767
  Запись опубликована в 09:38

ICQ-Клиент на vbicq4.dll

Не давно увидел статью на C#, где писали ICQ клиент.

Решил переписать под VB.NET

Работа осуществляется с помощью библиотеки vbicq4.dll

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

Загрузить проект

IcqClient ICQ Клиент на vbicq4.dll

  Метки:
  Евгений
  Просмотров: 5 290
  Запись опубликована в 05:24

Получаем количество входящих сообщений

Простой пример программы, которая через элемент WebBrowser будет авторизовываться на сайте mail.ru и будет получать количество входящих сообщений.

Загрузить проект

17002 Получаем количество входящих сообщений

  Метки:
  Евгений
  Просмотров: 25 551
  Запись опубликована в 15:52

Браузер по умолчанию

Узнаем какой браузер выбран по умолчанию.

Dim regshell As Object
Dim DefaultBrowser As String
regshell = CreateObject("Wscript.Shell")
DefaultBrowser = regshell.regread("HKEY_CLASSES_ROOT\HTTP\shell\open\command\")
DefaultBrowser = LSet(DefaultBrowser, InStr(1, DefaultBrowser, ".exe", vbTextCompare) + 4)
DefaultBrowser = Replace(DefaultBrowser, Chr(34), vbNullString)
MsgBox(IO.Path.GetFileName(DefaultBrowser), , "Браузер по умолчанию")

DefaultBrowser Браузер по умолчанию

  Метки:
  Евгений
  Просмотров: 3 569
  Запись опубликована в 13:05

Видео плеер на Winmm

Сырой пример, как воспроизвести видео файлы в PictureBox.

Чтобы видео файлы воспроизводились нормально, нужно установить кодек XVid , он будет прилагаться в месте с проектом.

VideoPlayer Видео плеер на Winmm

Чтобы добавить новый функционал - юзайте функции winmm.dll

В проекте есть одна ошибка. Вычисляет продолжительность видео не верно.

Загрузить проект

  Метки:
  Евгений
  Просмотров: 6 535
  Запись опубликована в 06:13

Страницы:«1...363738394041424344»