lukning af java.exe via VB

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!!!

Er der nogen der kan HJÆLPE
På forhånd tak!