Change Windows Caption

Posted: 2002-06-01
By: ArchiveBot
Viewed: 70

Filed Under:

VB6 Code Cache

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.