Основы VB -  Советы          Меню
Разделительная полоска
Полоска подчёркивающая меню
 Чтобы в меню между пунктами ввести разделительную полоску, в окне "Menu Editor" в поле "Caption" введите "-" (тире), а поле "Name" любое имя.

 Назад

Если ваша форма содержит меню, введите в событие 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 

 Назад

 

Используются технологии uCoz