Visual Basic, .NET, ASP, VBA, VBScript
 
  Библиотека кодов  
  Окна и операции с ними  
     
  Поменять заголовки всех активных окон  
  Данный пример поменяет заголовки всех активных окон, представленных на панели задач.

Расположите на форме элемент CommandButton. Изменив в событии Command1_Click() строковое значение в скобках и нажав после запуска программы на кнопку, вы измените заголовки всех окон.


Private Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long

Public Sub WindowCaptionChangeAll(NewText As String)
For nI = 1 To 10000
Call SetWindowText(nI, NewText)
Next
End Sub

Private Sub Command1_Click()
WindowCaptionChangeAll ("GARIK")
End Sub
 
     
  VBNet online (всего: 51216)  
 

Логин:

Пароль:

Регистрация, забыли пароль?


В чате сейчас человек
 
     
  VBNet рекомендует  
   
     
  Лучшие материалы  
 
ActiveX контролы (112)
Hitman74_Library (36119)
WindowsXPControls (20739)
FlexGridPlus (19374)
DSMAniGifControl (18295)
FreeButton (15157)
Примеры кода (546)
Parol (18027)
Passworder (9299)
Screen saver (7654)
Kerish AI (5817)
Folder_L (5768)
Статьи по VB (136)
Мое второе впечатление... (11236)
VB .NET: дорога в будущее (11161)
Основы SQL (9225)
Сообщения Windows в Vi... (8788)
Классовая теория прогр... (8619)
 
     
Техническая поддержка MTW-хостинг | © Copyright 2002-2011 VBNet.RU | Пишите нам