Мир программирования на Visual BASIC 5.0 и HTML
Мой сайт
  главная
  архив
  Memo Ver. 2.0
  WIN com 95
  Проекты

Спонсоры
  Городской кот
  Subscribe.Ru

Ссылки
  VB Streets
  Visual BASIC
  SnoozeX Design

О подписке
  Статистика
  Подписаться


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

мы в режиме:

Несколько слов от автора:
Несколько слов от автора: Дорогие подписчики! Вот и вышел в свет первый номер моей рассылки, в ней, я постараюсь рассказать вам о секретах языка программировая Visual Basic, дать описания HTML и JAVA Script, ознакомить вас с API функциями и включать в каждый выпуск программы юмористический детектив Историк! Если вас не затруднит, мы можем обменятся рекламой (я размещаю на страницах этой рассылки в разделе ссылки ссылку на ваш сайт, а вы взамен устанавливаете кнопку на своем сайте). Код кнопки в конце рассылки. Все кто заинтересовались вместе со мной вести данную рассылку пожалуйста отправте сообщение мне на E-Mail. Я думаю что вам моя рассылка очень понравится. Желаю приятного времяпровождения!   @LEXis

1.09.2000 Выпуск N1 Обзор ведет @LEXis

Сегодня в выпуске:


В разделе API функции VB: Как перезагрузить Windows и как ловить нажатия на клавиши вне вашей программы.
В разделе основы дизайна для web-страниц: Фон
В разделе детектива "Историк": Часть первая "От Сидоровича до топора"



API функции Visual BASIC 5.0


Как перезагрузить Windows

Разместите в модуле:
   Public Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, _
     ByVal dwReserved As Long) As Long

   Public Const EWX_LOGOFF = 0
   Public Const EWX_SHUTDOWN = 1
   Public Const EWX_REBOOT = 2
   Public Const EWX_FORCE = 4

А это в коде:
   Dim s As Long

   'Так можно сделать Shut down
    s = ExitWindowsEx(EWX_SHUTDOWN, 0&)

   'Так можно сделать Log off
   s = ExitWindowsEx(EWX_LOGOFF, 0&)

   'А так Reboot 
   s = ExitWindowsEx(EWX_REBOOT, 0&

Как ловить нажатия на клавиши вне вашей программы
	1. Положите на форму таймер, поставьте интервал в 50

        2. Добавьте в модуль:


   Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
   
   Public Const VK_TAB = &H9 ' Константа для TAB key.   
                             ' константы для других кнопок посмотрите в API вьювере
   ' Поместите в событие Timer:   
   If GetAsyncKeyState(VK_TAB) And KEY_SHIFT = True Then
        msgboх "Кто то трогает ТАБ", vbinformation
   End If


Основы дизайна для web-страниц


Фон


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

Наиболее часто при выборе фона встречаются следующие ошибки:
   Слишком яркий фон, который прекрывает сообщение.
   Слишком темный фон, на котором не видно текста сообщения.
   Слишком монотонный фон, придающий вашему сообщению унылый вид.
   Слишком насыщенный фон, отвлекающий внимание от основной информации.

Конечно же, не стоит забывать об основном назначении фона - он не должен привлекать болшего внимание, чем само сообщение. Выбирайте фон, который бы не бросался в глаза, но был запоминающемся, либо не используйте вовсе.



Юмористический детектив "ИСТОРИК".


Часть 1: От Сидовича до топора


   Летним вечером Владимир завернул с улицы в неосвещенный подъезд дома. Пройдя на чердак, он начал разгребать небольшую кучу мусора. Вскоре он нашёл грязный, рваный пакет, в котором лежал окровавленный топор. Владимир протер топор рукавом своей старой рубашки. После осмотра орудия Владимир положил его обратно в пакет.
 Владимир Алексеевич Щитков был человеком средних лет, носившим очки типа "гипноз" и старый костюм, доставшийся ему от прадеда. Владимир преподавал урок истории в средней школе №89. После появления его в школе, пошли слухи, что он насильственно убивал детей топором. Владимир часто бывал в разнообразных "киллерских клубах". Он тоже, как и все другие, имел своё прозвище: "Историк". Владимир проснулся ранним утром, ещё перед восходом солнца. Потом он решил проверить на месте, ли топор, но его не оказалось! Он перерыл весь чердак, топора как будто вообще не было. План очередного убийства ребёнка провалился, так как пропало оружие. У киллера не было оружия, а какой киллер без оружия? Да никакой!
   Он решил найти "вора" среди подозрительных ребят 6 "а" класса, которые часто следили за ним. Первым в его списке "значился" Сидорович Дмитрий. Дима был очень трусливым мальчиком, поэтому был не самым популярным человеком в классе. Он учился хорошо, а его самый любимый предмет был история. Именно этот факт привлёк киллера. Вначале "учитель" решил проверить, Сидорович ли украл оружие, а последние несколько недель Дима проболел и хотел догнать в учёбе остальных ребят...
   Историк решил незамедлительно приступить к началу операции.
   После школы учитель сразу отправился к месту жительства ученика. Он подошёл к его подъёзду и стал  ждать, пока мальчик не покажется. Владимир ждал недолго: жертва сама шла к нему в руки. Из-за угла показался, Дима и учитель набросился на него, приставив к шее осколок стекла. Историк привёл его на тот самый чердак, где, по его мнению, ученик украл топор. Он стал требовать от Димы признания в краже, нанося раны на его тело осколком. Сидорович говорил, что никакого отношения не имеет к пропаже оружия, но историк не остановился, пока мальчик не погиб от потери крови. Владимир, чтобы замести следы, расчленил тело и бросил в вентиляционную трубу. Проснувшись утром, Историк наткнулся на свой топор, засыпанный песком.

Спасибо за внимание. Ваш @LEXis

Программы разработанные автором на VB 6.0

MemO Ver 1.2.0
Данная программа MemO разработана на языке программирования Visual BASIC 6.0. и является на данное время "freeware". Эта утилита используется как записная книга, с сохранением данных в реестр памяти или в текстовый файл. В данной обновленной версии программы изменен дизайн и подсказка к навигатору.

Источник: SnoozeX Design

Код моей кнопки
<!-- SnoozeX Design "PLAY" -->
<a href="http://snoozex.boom.ru" TARGET="_blank"><BR><IMG SRC="http://snoozex.boom.ru/new.gif" WIDTH=88 HEIGHT=31 BORDER=1 ALT="SnoozeX Design"></a>
<!-- SnoozeX Design "END" -->

Copyright © 2000 @LEXis
Design by SnoozeX Design
@LEXis WEB SITE
Email : snoozex@mail.ru
ICQ uin : 14912636
Подписаться на рассылку Кувалина Алексея
Мир программирования на Visual BASIC и HTML

 

Home ] Up ] О группе ] Статьи ] Исходники ] Орфография ] Приёмы ] Проекты ]

Хостинг от uCoz