Set Fs_Start_Cmd_tcl = CreateObject("Scripting.FileSystemObject") 
    Set F_Start_Cmd_tcl = Fs_Start_Cmd_tcl.OpenTextFile(F3, ForWriting, True, 0) 程序提示OpenTextFile 没有该函数或过程,为什么啊?

解决方案 »

  1.   

    没有引用“Microsoft Scripting Runtime”??
      

  2.   

    vb?      excel?
      

  3.   

    工程——〉引用——〉Microsoft Scripting Runtime
      

  4.   

    excel工具——〉引用——〉Microsoft Scripting Runtime
      

  5.   

    他这里用CreateObject方法创建对象,貌似不需要引用吧
      

  6.   

    我也觉得是..应该是变量名称不对应导致的:
    Set Fs_Start_Cmd_tcl = CreateObject("Scripting.FileSystemObject")
        Set F_Start_Cmd_tcl = Fs_Start_Cmd_tcl.OpenTextFile(F3, ForWriting, True, 0)