hWnd = FindWindow("SunAwtFrame", item)
            hWndC = FindWindowEx(hWnd, IntPtr.Zero, "SunAwtCanvas", _
              vbNullString)
            hWnd = FindWindowEx(hWndC, IntPtr.Zero, "Edit", vbNullString)
 
            SendMessages(Me.hWnd.ToInt32, 12, 1048576, (ListBox1.Items.Item( _
              0))) 'Für die Taskleiste
            SendMessages(Me.hWnd.ToInt32, 7, 132804, "")
            System.Threading.Thread.Sleep(1)
            PostMessage(Me.hWnd.ToInt32, 256, 13, 132804) 'Hier müssen halt die 
            ' Zahlen rein >.<
            PostMessage(Me.hWnd.ToInt32, 258, 13, 132804) ' Google spuckt 
            ' nichts aus.
            System.Threading.Thread.Sleep(1)
            PostMessage(Me.hWnd.ToInt32, 257, 13, -1071906815)
            SendMessages(Me.hWnd.ToInt32, 8, 132804, "")