(十六)VBA常用基础知识：vba调用java jar，并获取返回值

1. 工具->引用里将Windows Script Host Object Model选上
2. 将下边的ava类打包，打包参照前一篇powershell调用java

package demo;

public class Test {

   public static void main(String[] args) {
       String ret = 123;
       ret = ret + args[0];
       
       System.out.println(ret);
   	
   }

}

3.vba调用

Sub test()
    Set WshShell = CreateObject("WScript.Shell")

    Set oExec = WshShell.Exec("java -jar /Users/sixdog/Documents/windows_batch/test.jar 10")
    saw = oExec.StdOut,ReadAll
    
    Debug.print saw
    set WshShell = Nothing
    set oExec = Nothing
End Sub