Главная страницаОбратная связьКарта сайта

Добавить 3D-Line под Меню



'Если вы хотите, чтобы ваше меню было подчеркнутым, добавьте в событие
'Form_Load() код 1 или 2

'Пример 1. Добавите Frame1
Private Sub Form_Load()
Frame1.Caption = ""
Frame1.Height = 30
Frame1.Width = Screen.Width + 100
Frame1.Move -50, 0
End Sub

'Пример 2.
Private Sub Form_Load()
AutoRedraw = True
ScaleMode = 3
Cls
Line (0, 0)-Step(ScaleWidth, 0), QBColor(8)
Line (0, 1)-Step(ScaleWidth, 0), QBColor(15)
AutoRedraw = False
End Sub


Обсудить статью на форуме


Если Вас заинтересовала или понравилась информация программирование на Visual Basic - "Добавить 3D-Line под Меню", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

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


Copyright © 2008 - 2022 Дискета.info