如何解決调用Excel自身的一个bug??

[FrankyChan]

有时调用excel.Application.Workbooks.Add(Missing.Value)会遇到如下错误：
Exception:Old format or invalid type library. (Exception from HRESULT: 0x80028018 (TYPE_E_INVDATAREAD))
这是Excel自身的一个bug，当本地系统环境被设置成非英文的，而Excel是英文的时候，就会出现，需要临时设定英文环境，代码如下：

c#写法是
先临时更改区域语言
System.Globalization.CultureInfo CurrentCI = System.Threading.Thread.CurrentThread.CurrentCulture;
System.Threading.Thread.CurrentThread.CurrentCulture = new System.Globalization.CultureInfo("en-US");
再改回之前的区域语言
System.Threading.Thread.CurrentThread.CurrentCulture = CurrentCI;


请问VB2005下应如何写?谢谢.

[yanlongwuhui]

'先临时更改区域语言
Dim CurrentCI As System.Globalization.CultureInfo = System.Threading.Thread.CurrentThread.CurrentCulture
System.Threading.Thread.CurrentThread.CurrentCulture = New System.Globalization.CultureInfo("en-US")
'再改回之前的区域语言
System.Threading.Thread.CurrentThread

[yanlongwuhui]

'先临时更改区域语言
Dim CurrentCI As System.Globalization.CultureInfo = System.Threading.Thread.CurrentThread.CurrentCulture
System.Threading.Thread.CurrentThread.CurrentCulture = New System.Globalization.CultureInfo("en-US")
'再改回之前的区域语言
System.Threading.Thread.CurrentThread.CurrentCulture = CurrentCI

[lovehongyun]

试试

'先临时更改区域语言 
Dim CurrentCI As System.Globalization.CultureInfo = System.Threading.Thread.CurrentThread.CurrentCulture 
System.Threading.Thread.CurrentThread.CurrentCulture = New System.Globalization.CultureInfo("en-US") 
'再改回之前的区域语言 
System.Threading.Thread.CurrentThread.CurrentCulture = CurrentCI 

[FrankyChan]

成功. thank you.

[qinhl99]

也不见得这就是一个bug

[superb_aby]

.........