Declare Function GetForegroundWindow Lib "user32" () As Long
Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (Byval hwnd
As Long, Byval lpsz As String) As Integer
Dim hwnd As Long
Dim lpsz As String
Dim ret As Integer
hwnd = GetForegroundWindow ()
lpsz = "Title"
ret = SetWindowText ( hwnd, lpsz )
By submitting your email address, you agree to receive emails regarding relevant topic offers from TechTarget and its partners. You can withdraw your consent at any time. Contact TechTarget at 275 Grove Street, Newton, MA.