Change Windows Caption
Posted: 2002-06-01
By: ArchiveBot
Viewed: 70
Filed Under:
No attachments for this post
This Program Changes the Caption of > ALMOST < any windows program!
Original Author: Dillon
Assumptions
Surprizingly Easy... Just Type the text of the Windows Program that you wish to change then type the text you want to change it too!
Side Effects
There is no Side Effects to This Program
API Declarations
Public Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Code
'make 2 text boxes
'Name them Text1 - For The Windows Caption
'And Text2 - For the New WIndows Caption
'Make 1 Button
'Name it Command1
Private Sub Command1_Click()
Dim temp As Long
temp = FindWindow(vbNullString, Text1.Text)
SetWindowText temp, Text2.Text
End Sub
Comments on this post
No comments have been added for this post.
You must be logged in to make a comment.