Как сделать, чтобы программа автоматически подстраивалась под разрешение монитора - VB
Формулировка задачи:
Здравствуйте!
У меня возник некий вопрос. Как сделать:
1. Чтобы окна программы автоматом подстраивались под разрешение пользователя на его машине (будь то ноутбук, нетбук или что-то иное)
2. Во многих крупных программах перед открытием самого интерфейса программы появляется её логотип на экране (пример: 1С). Как это сделать
Всем за ранее спасибо!!!!!
Решение задачи: «Как сделать, чтобы программа автоматически подстраивалась под разрешение монитора»
textual
Листинг программы
Public Sub rsz(frm As Form, w, h) Dim w1 As Single, h1 As Single w1 = frm.Width / w h1 = frm.Height / h Dim Cont As Control On Error GoTo Err For Each Cont In frm.Controls With Cont .Width = .Width * w1 .Height = .Height * h1 .Top = .Top * h1 .Left = .Left * w1 End With Next Err: Err.Clear Resume Next End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д