Команда для просмотра screen resolution - VB
Формулировка задачи:
Какой командой смотреть текущий сабж и какой его менять?
Решение задачи: «Команда для просмотра screen resolution»
textual
Листинг программы
Private Declare Function GetSystemMetrics Lib 'user32' _ (ByVal nIndex As Long) As Long Private Sub Form_Load() MsgBox 'Разрешение экрана: ' & GetSystemMetrics(0) & 'x' _ & GetSystemMetrics(1) End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д