ChDir 语句

修改当前目录或驱动器。

warning

Some DOS-specific file and directory functions are no longer provided in Collabora Office, or their function is only limited. For example, support for the ChDir, ChDrive and CurDir functions is not provided. Some DOS-specific properties are no longer used in functions that expect file properties as parameters (for example, to differentiate from concealed files and system files). This ensures the greatest possible level of platform independence for Collabora Office. Therefore this feature is subject to removal in a future release.


note

The ScriptForge library in Collabora Office 7.1 introduces the FileSystem service with methods to handle files and folders in user scripts.


语法:


ChDir Text As String

参数:

Text」: 用于指定目录路径或驱动器的任意字符串表达式。

批注图标

如果只需要修改当前驱动器,请输入驱动器号,并在后面加上冒号。


错误代码:

5 无效的过程调用

76 未找到路径

示例:


  Sub ExampleChDir
      Dim sDir1 As String, sDir2 As String
      sDir1 = "C:\Test"
      sDir2 = "D:\Private"
      ChDir( sDir1 )
      MsgBox CurDir
      ChDir( sDir2 )
      MsgBox CurDir
  End Sub

请支持我们!