Use Shell, something like this
vb Code:
  1. Private Sub Command1_Click()
  2.     Shell "java.exe " & Text1.Text & " " & Text2.Text & "jar program-name.jar", vbNormalFocus
  3. End Sub