Ha valaki jártas VB-ben, vessen már erre egy pillantást, mert kitépem a hajam. Ez egy tök alap kis progi, számtalan hasonló szemantikájú kódot lehet a neten találni, nálam azonban nem ok a dolog. A kézzel megadott title-t keresi, meg is van nyitva, lesz is rá egy handle értékem (egy 18 jegyû szám), ez ok. A gond a kicsillagozott résznél van, mivel a "windowlength" érték szintén egy 18 jegyû szám, 18 helyett... És a debug nem is fut le, mivel aritmetikai hibát jelez. Ha kézzel állítom be a méretet (ahogy most is van a kódban), akkor továbbmegy, azonban csak ezeket a 18 számjegyû összegeket kapom, az "Untitled - Notepad" text helyett...
Még tanulom a dolgokat, de valahogy elvesztem, ha valaki jártas ebben, szívesen venném, ha rá tudna nézni, hogy hol cseszem el...
Köszi
Public Class Form1
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As String) As Long
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click