ByVal …… As StringByVal对于String并不是传值,而是将VB字符串处理成BSTR发送,接收后再转为VB字符串