lukke for java.exe processe

Jeg har lavet et java program hvor til jeg har lavet en VB brugerflade. Jeg starter java programmet ved følgende kode:


Private Sub form_load()
    Dim run As SHELLEXECUTEINFO  ' strukture som funktionen benytter
    Dim retval As Long  ' return value
   
    ' Loader den information der er nødvendigt til at åbne "E:\j2sdk1.4.0\bin\run1.bat"
    ' ind i strukturen.
    With run
        ' størrelsen af strukturen
        .cbSize = Len(run)
        ' brug den valgbare hProcess.
        .fMask = SEE_MASK_NOCLOSEPROCESS
        ' formen der hvori funktionen skal udføres.
        .hWnd = FormBilledeBeregner1.hWnd
        ' udfører "open".
        .lpVerb = "open"
        ' Filen der åbnes.
        .lpFile = "D:\jdk1.3.1_05\bin\run1.bat"
        ' Default dir.
        .lpDirectory = "D:\jdk1.3.1_05\bin"
        retval = ShellExecuteEx(run)
    End With   

Efter at have startet java programmet kan dette ses i proces vinduet som java.exe
Det jeg gerne vil er så at kunne stoppe/lukke jave.exe processen fra min VB brugerflade!!!
Jeg har altså brug for at finde pid til java.exe processen og via dette lukke for java.exe processen!
Er der nogen der kan HJÆLPE
På forhånd tak!