我在电脑上有一个txt的文件，在WINCC中通过ＶＢＳ　来读取，但是发现程序走到打开文件，读取的那一步，走不下去了，大家帮我看一下，我错在什么地方。　多谢！具体的程序如下：

Sub OnClick(Byval Item)

Dim fso
Dim txtfile
Dim szContent

HMIRuntime.Tags("Wri_00").Write 0
Set fso = CreateObject("s cripting.FileSystemObject")
HMIRuntime.Tags("Wri_00").Write 1
Set txtfile = fso.OpenTextFile("C:\My Work Station\WinCC Test.txt",ForReading)
HMIRuntime.Tags("Wri_00").Write 2
szContent = txtfile.ReadAll

HMIRuntime.Tags("Wri_00").Write 3
HMIRuntime.Tags("Rea").Write txtfile.ReadLine

HMIRuntime.Tags("Wri_00").Write 4

txtfile.close

End Sub


我的程序只能走到Set txtfile = fso.OpenTextFile("C:\My Work Station\WinCC Test.txt",ForReading)　这个地方，但是这个地方的语句并没有被执行。

是不是这个语句有问题？那么问题又是什么？
多谢大家了！